put coqPassCoreToCore on the CoreM monad, greatly simplify Desugar.lhs
[ghc-hetmet.git] / compiler / hsSyn / HsExpr.lhs-boot
index e0b4d04..ccae210 100644 (file)
@@ -4,12 +4,23 @@ module HsExpr where
 import SrcLoc    ( Located )
 import Outputable ( SDoc, OutputableBndr )
 import {-# SOURCE #-} HsPat  ( LPat )
+
+import Data.Data
        
 data HsExpr i
 data HsSplice i
 data MatchGroup a
 data GRHSs a
 
+instance Typeable1 HsSplice
+instance Data i => Data (HsSplice i)
+instance Typeable1 HsExpr
+instance Data i => Data (HsExpr i)
+instance Typeable1 MatchGroup
+instance Data i => Data (MatchGroup i)
+instance Typeable1 GRHSs
+instance Data i => Data (GRHSs i)
+
 type LHsExpr a = Located (HsExpr a)
 type SyntaxExpr a = HsExpr a