X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Fparser%2FLexer.x;fp=ghc%2Fcompiler%2Fparser%2FLexer.x;h=eb00e9061384e94b01530ef0846427cdd3ba2b4e;hb=b9bf4ab28ad7bd7c33e08065859a3add2660707d;hp=407b5fa5168233ce2b3fa191f664644d430b44db;hpb=39208cd2805a1c9b22e541e7826c7f9e6f56f680;p=ghc-hetmet.git

diff --git a/ghc/compiler/parser/Lexer.x b/ghc/compiler/parser/Lexer.x
index 407b5fa..eb00e90 100644
--- a/ghc/compiler/parser/Lexer.x
+++ b/ghc/compiler/parser/Lexer.x
@@ -109,7 +109,7 @@ $white_no_nl+ 				;
 -- have to exclude those.
 -- The regex says: "munch all the characters after the dashes, as long as
 -- the first one is not a symbol".
-"--"\-* [^$symbol] .*			;
+"--"\-* [^$symbol :] .*			;
 "--"\-* / { atEOL }			;
 
 -- 'bol' state: beginning of a line.  Slurp up all the whitespace (including