diff options
| author | diederik | 2002-07-29 11:29:17 +0000 |
|---|---|---|
| committer | diederik | 2002-07-29 11:29:17 +0000 |
| commit | cbddda6d5a240e42566fb0d00f4e056491af56cd (patch) | |
| tree | ca8c338088df5b30c9de1c5b9f3074cdafe2e385 /frontend/transform.dcl | |
| parent | optimise (normal) selection from known records (diff) | |
add to exports for unused strict let removal after fusion
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@1176 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'frontend/transform.dcl')
| -rw-r--r-- | frontend/transform.dcl | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/frontend/transform.dcl b/frontend/transform.dcl index 6f8e92d..0d78868 100644 --- a/frontend/transform.dcl +++ b/frontend/transform.dcl @@ -19,6 +19,15 @@ partitionateAndLiftFunctions :: ![IndexRange] !Index !PredefSymbolsForTransform :: CopiedLocalFunctions +:: CollectState = + { cos_var_heap :: !.VarHeap + , cos_symbol_heap :: !.ExpressionHeap + , cos_error :: !.ErrorAdmin + , cos_predef_symbols_for_transform :: !PredefSymbolsForTransform + } + +determineVariablesAndRefCounts :: ![FreeVar] !Expression !*CollectState -> (!Expression , ![FreeVar], ![FreeVar], ![DynamicPtr], !*CollectState) + :: UnfoldState = { us_var_heap :: !.VarHeap , us_symbol_heap :: !.ExpressionHeap |