X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=utils%2Fext-core%2FLex.hs;h=8150b16fb8a634a14659cba00650bddf25063a2a;hp=ad9d2eb00f9994c34f193d05662ba87f4a7b9fff;hb=276585028d51a2516a31b91a91a1f4bba5c9f8ba;hpb=e415eeaf6c7771488af24758ca5b9c22c42be3a6

diff --git a/utils/ext-core/Lex.hs b/utils/ext-core/Lex.hs
index ad9d2eb..8150b16 100644
--- a/utils/ext-core/Lex.hs
+++ b/utils/ext-core/Lex.hs
@@ -84,7 +84,7 @@ lexKeyword cont cs =
       ("in",rest) -> cont TKin rest	
       ("case",rest) -> cont TKcase rest	
       ("of",rest) -> cont TKof rest	
-      ("coerce",rest) -> cont TKcoerce rest	
+      ("cast",rest) -> cont TKcast rest	
       ("note",rest) -> cont TKnote rest	
       ("external",rest) -> cont TKexternal rest
       ("_",rest) -> cont TKwild rest