diff options
| author | Reid Barton <rwbarton@gmail.com> | 2013-08-23 19:27:20 -0400 |
|---|---|---|
| committer | Austin Seipp <aseipp@pobox.com> | 2013-08-24 05:03:15 -0500 |
| commit | 6a02f280e074278acceb6e9331bb00dccfe02f08 (patch) | |
| tree | 628ba1943f4eb2d5c0e979f17e7cc6e98ec554ab | |
| parent | a54ace7bfdcb7841cadeb0ce62b604f502050672 (diff) | |
| download | haskell-6a02f280e074278acceb6e9331bb00dccfe02f08.tar.gz | |
Fix build on non-unicode locale
happy reads .y files with the system encoding, so keep Parser.y.pp ASCII.
Signed-off-by: Austin Seipp <aseipp@pobox.com>
| -rw-r--r-- | compiler/parser/Parser.y.pp | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/parser/Parser.y.pp b/compiler/parser/Parser.y.pp index 9d087068bf..489b5affa4 100644 --- a/compiler/parser/Parser.y.pp +++ b/compiler/parser/Parser.y.pp @@ -2249,8 +2249,8 @@ hintExplicitForall span = do forall <- extension explicitForallEnabled rulePrag <- extension inRulePrag unless (forall || rulePrag) $ parseErrorSDoc span $ vcat - [ text "Illegal symbol '∀' in type" + [ text "Illegal symbol '\x2200' in type" -- U+2200 FOR ALL , text "Perhaps you intended -XRankNTypes or similar flag" - , text "to enable explicit-forall syntax: ∀ <tvs>. <type>" + , text "to enable explicit-forall syntax: \x2200 <tvs>. <type>" ] } |