From: Simon Marlow <simonmar@microsoft.com>
Date: Wed, 25 Jan 2006 13:55:01 +0000 (+0000)
Subject: add double colon and double arrow symbols (-fglasgow-exts)
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=479cc24837aa2c14c3bbed323bb640a5c53a2522;p=ghc-hetmet.git

add double colon and double arrow symbols (-fglasgow-exts)
---

diff --git a/ghc/compiler/parser/Lexer.x b/ghc/compiler/parser/Lexer.x
index 3846b5a..3d5ebd3 100644
--- a/ghc/compiler/parser/Lexer.x
+++ b/ghc/compiler/parser/Lexer.x
@@ -560,6 +560,8 @@ reservedSymsFM = listToUFM $
 
 #if __GLASGOW_HASKELL__ >= 605
        ,("λ",	ITlam,          bit glaExtsBit)
+       ,("∷",   ITdcolon,       bit glaExtsBit)
+       ,("⇒",   ITdarrow,	bit glaExtsBit)
        ,("∀",	ITforall,	bit glaExtsBit)
        ,("→",   ITrarrow,	bit glaExtsBit)
        ,("←",   ITlarrow,	bit glaExtsBit)