diff options
| author | johnvg | 2011-03-31 15:26:26 +0000 |
|---|---|---|
| committer | johnvg | 2011-03-31 15:26:26 +0000 |
| commit | ad561c6f2055303bc355cc5e84dbf1e8b614f30e (patch) | |
| tree | d51044322863053a4d19397bc8e4dfd6b871f5e3 /frontend/convertcases.dcl | |
| parent | make the following identical local functions of functions analyseGroups and r... (diff) | |
use type Component instead of Group in the fusion modules: partition, classify and trans,
because function pointers for generated functions are stored in the Component,
they can be found without searching the new functions list
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@1895 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'frontend/convertcases.dcl')
| -rw-r--r-- | frontend/convertcases.dcl | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/frontend/convertcases.dcl b/frontend/convertcases.dcl index 243b5d5..6099a65 100644 --- a/frontend/convertcases.dcl +++ b/frontend/convertcases.dcl @@ -3,13 +3,14 @@ */ definition module convertcases -import syntax, transform +import syntax +from trans import ::Component :: LetVarInfo :: LetExpressionInfo :: RefCountsInCase :: SplitsInCase -convertCasesOfFunctions :: !*{! Group} !Int !{# {# FunType} } !{# CommonDefs} !*{#FunDef} !*{#{# CheckedTypeDef}} +convertCasesOfFunctions :: !*{!Component} !Int !{# {# FunType} } !{# CommonDefs} !*{#FunDef} !*{#{# CheckedTypeDef}} !ImportedConstructors !*VarHeap !*TypeHeaps !*ExpressionHeap - -> (!ImportedFunctions, !*{! Group}, !*{#FunDef}, !*{#{# CheckedTypeDef}}, !ImportedConstructors, !*VarHeap, !*TypeHeaps, !*ExpressionHeap) + -> (!ImportedFunctions, !*{!Component}, !*{#FunDef}, !*{#{# CheckedTypeDef}}, !ImportedConstructors, !*VarHeap, !*TypeHeaps, !*ExpressionHeap) |