X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Fparser%2FLex.lhs;h=9cd6567c50e383f4d67ca1876262558bc8946590;hb=292c077de7dbe98eb44911648f16e243b40db2ac;hp=6c69738d9f1de6d008ed3227838481c69ac5a0be;hpb=8894fd8508fc5ac3b793187c323e4732a73b4a24;p=ghc-hetmet.git

diff --git a/ghc/compiler/parser/Lex.lhs b/ghc/compiler/parser/Lex.lhs
index 6c69738..9cd6567 100644
--- a/ghc/compiler/parser/Lex.lhs
+++ b/ghc/compiler/parser/Lex.lhs
@@ -123,6 +123,7 @@ data Token
   | ITccallconv
 
   | ITinterface			-- interface keywords
+  | ITexpr
   | IT__export
   | ITdepends
   | IT__forall
@@ -295,6 +296,7 @@ ghcExtensionKeywordsFM = listToUFM $
 
 	-- interface keywords
         ("__interface",		ITinterface),
+        ("__expr",		ITexpr),
 	("__export",		IT__export),
 	("__depends",		ITdepends),
 	("__forall",		IT__forall),