merge GHC HEAD

[ghc-hetmet.git] / utils / genprimopcode / ParserM.hs

diff --git a/utils/genprimopcode/ParserM.hs b/utils/genprimopcode/ParserM.hs
index d70947b..a2b39d7 100644 (file)
--- a/utils/genprimopcode/ParserM.hs
+++ b/utils/genprimopcode/ParserM.hs
@@ -18,8 +18,6 @@ module ParserM (
     happyError
  ) where
 
-import Syntax
-
 -- Parser Monad
 newtype ParserM a = ParserM (AlexInput -> St -> Either String (AlexInput, St, a))
 
@@ -83,6 +81,7 @@ data Token = TEOF
            | TUpperName String
            | TString String
            | TNoBraces String
+           | TInteger Int
     deriving Show
 
 -- Actions