From: Ian Lynagh <igloo@earth.li>
Date: Tue, 10 Jul 2007 20:36:06 +0000 (+0000)
Subject: "Foo"# syntax is enabled by the MagicHash extension
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=58652c5c3faffc48dd36eb49dad33391d2300459

"Foo"# syntax is enabled by the MagicHash extension
---

diff --git a/compiler/parser/Lexer.x b/compiler/parser/Lexer.x
index be388d4..39ce371 100644
--- a/compiler/parser/Lexer.x
+++ b/compiler/parser/Lexer.x
@@ -1112,8 +1112,8 @@ lex_string s = do
 
     Just ('"',i)  -> do
 	setInput i
-	glaexts <- extension glaExtsEnabled
-	if glaexts
+	magicHash <- extension magicHashEnabled
+	if magicHash
 	  then do
 	    i <- getInput
 	    case alexGetChar' i of