aboutsummaryrefslogtreecommitdiff
path: root/frontend/syntax.dcl
diff options
context:
space:
mode:
authorjohnvg2003-02-24 11:46:16 +0000
committerjohnvg2003-02-24 11:46:16 +0000
commit57677ebd9771787aed8fc32efd30441f08f19f93 (patch)
treef212cbfa8686b2ee432a11cfd0843416f0738be8 /frontend/syntax.dcl
parentdon'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.dcl5
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]