[project @ 2003-11-27 13:26:38 by simonmar]

[ghc-hetmet.git] / ghc / compiler / parser / Lexer.x

diff --git a/ghc/compiler/parser/Lexer.x b/ghc/compiler/parser/Lexer.x
index ccfc3e8..bb32d63 100644 (file)
--- a/ghc/compiler/parser/Lexer.x
+++ b/ghc/compiler/parser/Lexer.x
@@ -174,6 +174,7 @@ $white_no_nl+                               ;
                                        { token ITdeprecated_prag }
   "{-#" $whitechar* (SCC|scc)          { token ITscc_prag }
   "{-#" $whitechar* (CORE|core)                { token ITcore_prag }
+  "{-#" $whitechar* (UNPACK|unpack)    { token ITunpack_prag }
   
   "{-#"                                { nested_comment }
 
@@ -349,6 +350,7 @@ data Token__
   | ITline_prag
   | ITscc_prag
   | ITcore_prag                 -- hdaume: core annotations
+  | ITunpack_prag
   | ITclose_prag
 
   | ITdotdot                   -- reserved symbols