{
+{-# OPTIONS_GHC -w #-}
+-- The above warning supression flag is a temporary kludge.
+-- While working on this module you are encouraged to remove it and fix
+-- any warnings in the module. See
+-- http://hackage.haskell.org/trac/ghc/wiki/WorkingConventions#Warnings
+-- for details
+
module HpcParser where
import HpcLexer
%name parser
%tokentype { Token }
-%error { \ e -> error $ show (take 10 e) }
%token
MODULE { ID "module" }
let tokens = initLexer txt
return $ parser tokens
-
+happyError e = error $ show (take 10 e)
}