From b9bf4ab28ad7bd7c33e08065859a3add2660707d Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Mon, 12 Dec 2005 14:22:30 +0000
Subject: [PATCH] [project @ 2005-12-12 14:22:30 by simonmar] Prevent --: 
 from being interpreted as a comment

---
 ghc/compiler/parser/Lexer.x |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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
-- 
1.7.10.4