From: simonmar <unknown>
Date: Wed, 11 Jan 2006 12:17:41 +0000 (+0000)
Subject: [project @ 2006-01-11 12:17:41 by simonmar]
X-Git-Tag: final_switch_to_darcs,_this_repo_is_now_live~37
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;ds=sidebyside;h=7434eae33776ba56eae28dfd85172dd86d180be2;p=ghc-hetmet.git

[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
--- 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)