From ea7b2faa18618b926fab05cc7cae5e540231a57b Mon Sep 17 00:00:00 2001 From: "df@dfranke.us" Date: Mon, 10 Dec 2007 23:06:49 +0000 Subject: [PATCH] FIX #1821 (Parser or lexer mess-up) --- compiler/parser/Lexer.x | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/compiler/parser/Lexer.x b/compiler/parser/Lexer.x index 84ee57e..01ed122 100644 --- a/compiler/parser/Lexer.x +++ b/compiler/parser/Lexer.x @@ -154,7 +154,7 @@ $tab+ { warn Opt_WarnTabs (text "Tab character") } -- Next, match Haddock comments if no -haddock flag -"-- " $docsym .* / { ifExtension (not . haddockEnabled) } ; +"-- " [$docsym \#] .* / { ifExtension (not . haddockEnabled) } ; -- Now, when we've matched comments that begin with 2 dashes and continue -- with a different character, we need to match comments that begin with three -- 1.7.10.4