aboutsummaryrefslogtreecommitdiff
path: root/frontend
diff options
context:
space:
mode:
authorronny2001-12-03 12:02:32 +0000
committerronny2001-12-03 12:02:32 +0000
commit5b545cf372fafb3702bb22d0bb24a9c5f5950b05 (patch)
tree6218c0446f499a5446e1c6cc8a183fb56f1b363d /frontend
parentremoved unused field (to make the module compilable with Clean 2.0) (diff)
work around for 2.0 compiler bug
predefined_idents is not parsed as a CAF because of the #-definitions git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@915 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'frontend')
-rw-r--r--frontend/predef.icl7
1 files changed, 7 insertions, 0 deletions
diff --git a/frontend/predef.icl b/frontend/predef.icl
index c4f0bca..fdd16d8 100644
--- a/frontend/predef.icl
+++ b/frontend/predef.icl
@@ -196,6 +196,13 @@ GetTupleTypeIndex tup_arity :== PD_Arity2TupleType + tup_arity - 2
predefined_idents :: {!Ident}
predefined_idents
+// RWS: work around for 2.0 compiler bug
+// predefined_idents is not parsed as a CAF because of the #-definitions
+ =: build_predefined_idents
+
+build_predefined_idents :: {!Ident}
+build_predefined_idents
+// ... RWS
# idents = createArray PD_NrOfPredefSymbols {id_name="",id_info=nilPtr}
# idents = { idents &
[PD_ConsSymbol] = i PD_ConsSymbol_String,