X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Fparser%2FLexer.x;h=bb32d631b39e6d2c3eadc1d213059559f2566cac;hb=e9e72bd1cd7776609aa7d7f5e71edc4c2edced4d;hp=ccfc3e850592f91c387414d9ab54beeb1e9b8454;hpb=f901ffc86ada53aaa65a3d941d344b9c036a6147;p=ghc-hetmet.git

diff --git a/ghc/compiler/parser/Lexer.x b/ghc/compiler/parser/Lexer.x
index ccfc3e8..bb32d63 100644
--- 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