diff options
author | martijnv | 2000-06-06 13:12:50 +0000 |
---|---|---|
committer | martijnv | 2000-06-06 13:12:50 +0000 |
commit | 68654ea46dafce07b9bf2037f6da71db0a91b924 (patch) | |
tree | e10100a98b830bc15644074c282bae5b514c3ee1 /frontend/predef.icl | |
parent | see 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.icl | 14 |
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) |