diff options
| author | ronny | 2001-07-18 15:59:40 +0000 |
|---|---|---|
| committer | ronny | 2001-07-18 15:59:40 +0000 |
| commit | c286e06d8dc9ac997d4658b502a5afda092b7285 (patch) | |
| tree | c8926487260197afc112b1b292b66fbcff0287c7 /backend | |
| parent | This commit was generated by cvs2svn to compensate for changes in r551, (diff) | |
removed MW comments
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@556 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'backend')
| -rw-r--r-- | backend/backendpreprocess.icl | 8 |
1 files changed, 0 insertions, 8 deletions
diff --git a/backend/backendpreprocess.icl b/backend/backendpreprocess.icl index 4c389e0..6b76e6c 100644 --- a/backend/backendpreprocess.icl +++ b/backend/backendpreprocess.icl @@ -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 |