diff options
| author | diederik | 2001-10-01 12:33:17 +0000 |
|---|---|---|
| committer | diederik | 2001-10-01 12:33:17 +0000 |
| commit | ea1106e5a62f951f46fc79b3248a9d61c15254c5 (patch) | |
| tree | ea5a93e282c29041713d6a8eda68fb5cfa69b92a /frontend/trans.dcl | |
| parent | removed erroneous, unused function (diff) | |
Add fusion commandline flag
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@805 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'frontend/trans.dcl')
| -rw-r--r-- | frontend/trans.dcl | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/frontend/trans.dcl b/frontend/trans.dcl index c10ee16..83f968c 100644 --- a/frontend/trans.dcl +++ b/frontend/trans.dcl @@ -4,9 +4,10 @@ import StdEnv import syntax, transform -cPassive :== -1 -cActive :== -2 -cAccumulating :== -3 +cPassive :== -1 +cActive :== -2 +cAccumulating :== -3 +cVarOfMultimatchCase :== -4 :: CleanupInfo @@ -14,7 +15,7 @@ analyseGroups :: !{# CommonDefs} !{#{#FunType}} !IndexRange !Int !Int !*{! Group -> (!CleanupInfo, !*{! ConsClasses}, !*{! Group}, !*{#FunDef}, !*VarHeap, !*ExpressionHeap) transformGroups :: !CleanupInfo !Int !Int !*{! Group} !*{#FunDef} !{!.ConsClasses} !{# CommonDefs} !{# {# FunType} } - !*{#{# CheckedTypeDef}} !ImportedConstructors !*TypeDefInfos !*VarHeap !*TypeHeaps !*ExpressionHeap + !*{#{# CheckedTypeDef}} !ImportedConstructors !*TypeDefInfos !*VarHeap !*TypeHeaps !*ExpressionHeap !Bool -> (!*{! Group}, !*{#FunDef}, !*{#{# CheckedTypeDef}}, !ImportedConstructors, !*VarHeap, !*TypeHeaps, !*ExpressionHeap) partitionateFunctions :: !*{# FunDef} ![IndexRange] -> (!*{! Group}, !*{# FunDef}) |