Skip to content
GitLab
Menu
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
64d2dd7b
Commit
64d2dd7b
authored
Jul 18, 2001
by
Ronny Wichers Schreur
🏘
Browse files
removed MW comments
parent
fd6e7f10
Changes
1
Hide whitespace changes
Inline
Side-by-side
backend/backendpreprocess.icl
View file @
64d2dd7b
...
...
@@ -146,14 +146,10 @@ instance sequence Selection where
sequence
(
DictionarySelection
dictionaryVar
dictionarySelections
_
index
)
=
sequence
index
// MW0 instance sequence (Bind Expression FreeVar) where
instance
sequence
LetBind
where
// MW0 sequence {bind_src=App app , bind_dst}
sequence
{
lb_src
=
App
app
,
lb_dst
}
// MW0 = sequence` app bind_dst
=
sequence`
app
lb_dst
where
// MW0 sequence` {app_symb, app_args} bind_dst sequenceState=:{ss_aliasDummyId}
sequence`
{
app_symb
,
app_args
}
lb_dst
sequenceState
=:{
ss_aliasDummyId
}
|
not
(
isNilPtr
app_symb
.
symb_name
.
id_info
)
// nilPtr's are generated for Case's with case_ident=No in convertcases
&&
app_symb
.
symb_name
==
ss_aliasDummyId
...
...
@@ -164,16 +160,12 @@ instance sequence LetBind where
non_alias_bound_var
=
case
vi
of
VI_SequenceNumber
_
->
bound_var
VI_Alias
alias_bound_var
->
alias_bound_var
// MW0 ss_varHeap = writePtr bind_dst.fv_info_ptr (VI_Alias non_alias_bound_var) ss_varHeap
ss_varHeap
=
writePtr
lb_dst
.
fv_info_ptr
(
VI_Alias
non_alias_bound_var
)
ss_varHeap
->
{
sequenceState
&
ss_varHeap
=
ss_varHeap
}
_
// MW0 -> sequence bind_dst sequenceState
->
sequence
lb_dst
sequenceState
// MW0 = sequence bind_dst sequenceState
=
sequence
lb_dst
sequenceState
sequence
bind
// MW0 = sequence bind.bind_dst
=
sequence
bind
.
lb_dst
instance
sequence
FunctionPattern
where
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Attach a 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