The parser needs a set of parentheses when we don't use unsafeCoerce.

[ghc-hetmet.git] / ghc / compiler / parser / Parser.y.pp

diff --git a/ghc/compiler/parser/Parser.y.pp b/ghc/compiler/parser/Parser.y.pp
index d49ec76..3066a0f 100644 (file)
--- a/ghc/compiler/parser/Parser.y.pp
+++ b/ghc/compiler/parser/Parser.y.pp
@@ -275,7 +275,7 @@ TH_TY_QUOTE { L _ ITtyQuote       }      -- ''T
 %name parseIdentifier  identifier
 %name parseType ctype
 %partial parseHeader header
-%tokentype { Located Token }
+%tokentype { (Located Token) }
 %%
 
 -----------------------------------------------------------------------------