projects
/
ghc-hetmet.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
39208cd
)
[project @ 2005-12-12 14:22:30 by simonmar]
author
simonmar
<unknown>
Mon, 12 Dec 2005 14:22:30 +0000
(14:22 +0000)
committer
simonmar
<unknown>
Mon, 12 Dec 2005 14:22:30 +0000
(14:22 +0000)
Prevent --: from being interpreted as a comment
ghc/compiler/parser/Lexer.x
patch
|
blob
|
history
diff --git
a/ghc/compiler/parser/Lexer.x
b/ghc/compiler/parser/Lexer.x
index
407b5fa
..
eb00e90
100644
(file)
--- 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