summaryrefslogtreecommitdiff
path: root/compiler/cmm/CmmLex.x
diff options
context:
space:
mode:
authorMichael D. Adams <t-madams@microsoft.com>2007-05-16 15:53:37 +0000
committerMichael D. Adams <t-madams@microsoft.com>2007-05-16 15:53:37 +0000
commitf2cc8b5bc34519a65581dc40b7bfebac97bffd73 (patch)
treeb7dbe962fb8791331cbd4ce7a934d0ebaf0fcd06 /compiler/cmm/CmmLex.x
parent7c085edd732bd1fd52e758017da9eac583bfba1a (diff)
downloadhaskell-f2cc8b5bc34519a65581dc40b7bfebac97bffd73.tar.gz
Added 'return' to C--, and made arguments to 'jump' into CmmExpr
Diffstat (limited to 'compiler/cmm/CmmLex.x')
-rw-r--r--compiler/cmm/CmmLex.x2
1 files changed, 2 insertions, 0 deletions
diff --git a/compiler/cmm/CmmLex.x b/compiler/cmm/CmmLex.x
index a1aa2762a9..dffb3553f8 100644
--- a/compiler/cmm/CmmLex.x
+++ b/compiler/cmm/CmmLex.x
@@ -139,6 +139,7 @@ data CmmToken
| CmmT_jump
| CmmT_foreign
| CmmT_prim
+ | CmmT_return
| CmmT_import
| CmmT_switch
| CmmT_case
@@ -214,6 +215,7 @@ reservedWordsFM = listToUFM $
( "jump", CmmT_jump ),
( "foreign", CmmT_foreign ),
( "prim", CmmT_prim ),
+ ( "return", CmmT_return ),
( "import", CmmT_import ),
( "switch", CmmT_switch ),
( "case", CmmT_case ),