aboutsummaryrefslogtreecommitdiff
path: root/frontend/predef.icl
diff options
context:
space:
mode:
authormartijnv2000-06-06 13:12:50 +0000
committermartijnv2000-06-06 13:12:50 +0000
commit68654ea46dafce07b9bf2037f6da71db0a91b924 (patch)
treee10100a98b830bc15644074c282bae5b514c3ee1 /frontend/predef.icl
parentsee previous revision (diff)
coercions added though not complete
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@152 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'frontend/predef.icl')
-rw-r--r--frontend/predef.icl14
1 files changed, 9 insertions, 5 deletions
diff --git a/frontend/predef.icl b/frontend/predef.icl
index a1e92a9..b3ea69c 100644
--- a/frontend/predef.icl
+++ b/frontend/predef.icl
@@ -73,13 +73,16 @@ PD_TypeCodeClass :== 122
PD_TypeObjectType :== 124
PD_TypeConsSymbol :== 125
PD_unify :== 126
-PD_variablePlaceholder :== 127
-PD_StdDynamics :== 128
-PD_undo_indirections :== 129
+// MV ..
+PD_coerce :== 127
+PD_variablePlaceholder :== 128
+PD_StdDynamics :== 129
+PD_undo_indirections :== 130
-PD_Start :== 130
+PD_Start :== 131
-PD_NrOfPredefSymbols :== 131
+PD_NrOfPredefSymbols :== 132
+// .. MV
(<<=) infixl
@@ -146,6 +149,7 @@ where
<<- ("T_ypeConsSymbol", IC_Expression, PD_TypeConsSymbol)
<<- ("P_laceholder", IC_Expression, PD_variablePlaceholder)
<<- ("_unify", IC_Expression, PD_unify)
+ <<- ("_coerce", IC_Expression, PD_coerce) /* MV */
<<- ("StdDynamics", IC_Module, PD_StdDynamics)
<<- ("_undo_indirections", IC_Expression, PD_undo_indirections)
<<- ("Start", IC_Expression, PD_Start)