diff options
author | johnvg | 2003-02-24 11:46:16 +0000 |
---|---|---|
committer | johnvg | 2003-02-24 11:46:16 +0000 |
commit | 57677ebd9771787aed8fc32efd30441f08f19f93 (patch) | |
tree | f212cbfa8686b2ee432a11cfd0843416f0738be8 /frontend/syntax.dcl | |
parent | don't generate abc code to build dictionary for overloaded Nil (diff) |
added fusion of unboxed lists of records, moved
FI_IsNonRecursive from partition.icl and trans.icl
to syntax.dcl, added FI_IsUnboxedListOfRecordsConsOrNil
to mark instances of unboxed lists of records generated
in type.icl
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@1322 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'frontend/syntax.dcl')
-rw-r--r-- | frontend/syntax.dcl | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/frontend/syntax.dcl b/frontend/syntax.dcl index 3ab1a5a..62923d4 100644 --- a/frontend/syntax.dcl +++ b/frontend/syntax.dcl @@ -500,10 +500,10 @@ NoGlobalIndex :== {gi_module=NoIndex,gi_index=NoIndex} :: FunCall = FunCall !Index !Level | MacroCall !ModuleIndex !Index Level | DclFunCall !ModuleIndex !DclFunctionIndex; -/* Sjaak 19-3-2001 ... */ - FI_IsMacroFun :== 1 // whether the function is a local function of a macro FI_HasTypeSpec :== 2 // whether the function has u user defined type +FI_IsNonRecursive :== 4 // used in trans.icl and partition.icl +FI_IsUnboxedListOfRecordsConsOrNil :== 8 :: FunInfo = { fi_calls :: ![FunCall] @@ -514,7 +514,6 @@ FI_HasTypeSpec :== 2 // whether the function has u user defined type , fi_dynamics :: ![ExprInfoPtr] , fi_properties :: !BITVECT } -/* ... Sjaak 19-3-2001 */ :: ParsedBody = { pb_args :: ![ParsedExpr] |