From: simonmar Date: Thu, 12 Jan 2006 09:33:16 +0000 (+0000) Subject: [project @ 2006-01-12 09:33:16 by simonmar] X-Git-Tag: final_switch_to_darcs,_this_repo_is_now_live~33 X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=704ca16d2447b081eebd5f5e66635b19cba4a655 [project @ 2006-01-12 09:33:16 by simonmar] put unicode keywords under -fglasgow-exts, they aren't Hasell98 --- diff --git a/ghc/compiler/parser/Lexer.x b/ghc/compiler/parser/Lexer.x index 27b6e2d..3846b5a 100644 --- a/ghc/compiler/parser/Lexer.x +++ b/ghc/compiler/parser/Lexer.x @@ -559,11 +559,11 @@ reservedSymsFM = listToUFM $ ,(">>-", ITRarrowtail, bit arrowsBit) #if __GLASGOW_HASKELL__ >= 605 - ,("λ", ITlam, 0) - ,("∀", ITforall, bit tvBit) - ,("→", ITrarrow, 0) - ,("←", ITlarrow, 0) - ,("⋯", ITdotdot, 0) + ,("λ", ITlam, bit glaExtsBit) + ,("∀", ITforall, bit glaExtsBit) + ,("→", ITrarrow, bit glaExtsBit) + ,("←", ITlarrow, bit glaExtsBit) + ,("⋯", ITdotdot, bit glaExtsBit) #endif ]