Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
clean-compiler-and-rts
compiler
Commits
28241c7f
Commit
28241c7f
authored
Oct 03, 2001
by
Ronny Wichers Schreur
🏢
Browse files
eliminated cheat module
parent
2b63f548
Changes
5
Hide whitespace changes
Inline
Side-by-side
frontend/cheat.dcl
deleted
100644 → 0
View file @
2b63f548
system
module
cheat
i
::
!
b
->
a
uniqueCopy
::
!*
a
->
(!*
a
,
!*
a
)
frontend/cheat.icl
deleted
100644 → 0
View file @
2b63f548
implementation
module
cheat
i
::
!
a
->
b
i
x
=
code
{
.inline
i
no_op
.end
}
uniqueCopy
::
!*
a
->
(!*
a
,
!*
a
)
uniqueCopy
x
=
code
{
.inline
uniqueCopy
push_a
0
.end
}
frontend/explicitimports.icl
View file @
28241c7f
...
@@ -3,7 +3,7 @@ implementation module explicitimports
...
@@ -3,7 +3,7 @@ implementation module explicitimports
import
StdEnv
import
StdEnv
import
syntax
,
typesupport
,
parse
,
checksupport
,
utilities
,
checktypes
,
transform
,
predef
,
cheat
,
import
syntax
,
typesupport
,
parse
,
checksupport
,
utilities
,
checktypes
,
transform
,
predef
,
compilerSwitches
//, RWSDebug
compilerSwitches
//, RWSDebug
cUndef
:==
(
-1
)
cUndef
:==
(
-1
)
...
...
frontend/type.icl
View file @
28241c7f
...
@@ -2,7 +2,7 @@ implementation module type
...
@@ -2,7 +2,7 @@ implementation module type
import
StdEnv
import
StdEnv
import
syntax
,
typesupport
,
check
,
analtypes
,
overloading
,
unitype
,
refmark
,
predef
,
utilities
,
compare_constructor
// , RWSDebug
import
syntax
,
typesupport
,
check
,
analtypes
,
overloading
,
unitype
,
refmark
,
predef
,
utilities
,
compare_constructor
// , RWSDebug
import
cheat
,
compilerSwitches
import
compilerSwitches
import
generics
// AA
import
generics
// AA
::
TypeInput
=
::
TypeInput
=
...
@@ -2225,7 +2225,7 @@ where
...
@@ -2225,7 +2225,7 @@ where
#
(
error
=:{
ea_file
})
#
(
error
=:{
ea_file
})
=
errorHeading
"Uniqueness error"
error
=
errorHeading
"Uniqueness error"
error
(
coercion_env
,
copy_coercion_env
)
(
coercion_env
,
copy_coercion_env
)
=
unique
Copy
coercion_env
=
array
Copy
coercion_env
format
format
=
{
form_properties
=
cMarkAttribute
,
=
{
form_properties
=
cMarkAttribute
,
form_attr_position
=
Yes
(
reverse
positions
,
copy_coercion_env
)
}
form_attr_position
=
Yes
(
reverse
positions
,
copy_coercion_env
)
}
...
...
frontend/unitype.icl
View file @
28241c7f
...
@@ -5,7 +5,7 @@ import StdEnv
...
@@ -5,7 +5,7 @@ import StdEnv
import
syntax
,
analunitypes
,
type
,
utilities
,
checktypes
,
import
syntax
,
analunitypes
,
type
,
utilities
,
checktypes
,
compilerSwitches
//, RWSDebug
compilerSwitches
//, RWSDebug
import
cheat
//
import cheat
AttrUni
:==
0
AttrUni
:==
0
AttrMulti
:==
1
AttrMulti
:==
1
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment