[project @ 2006-01-11 12:17:41 by simonmar]

understand Unicode lambda as a synonym for \

diff --git a/ghc/compiler/parser/Lexer.x b/ghc/compiler/parser/Lexer.x
index 84e5a1a..27b6e2d 100644 (file)
--- a/ghc/compiler/parser/Lexer.x
+++ b/ghc/compiler/parser/Lexer.x
@@ -559,6 +559,7 @@ reservedSymsFM = listToUFM $
        ,(">>-",        ITRarrowtail,   bit arrowsBit)
 
 #if __GLASGOW_HASKELL__ >= 605
+       ,("λ", ITlam,          0)
        ,("∀",        ITforall,       bit tvBit)
        ,("→",   ITrarrow,    0)
        ,("←",   ITlarrow,    0)