fix a rather subtle SMP bug in anyWorkForMe()

[ghc-hetmet.git] / ghc / compiler / hsSyn / HsExpr.hi-boot-6

diff --git a/ghc/compiler/hsSyn/HsExpr.hi-boot-6 b/ghc/compiler/hsSyn/HsExpr.hi-boot-6
index 73bbfde..40e18ef 100644 (file)
--- a/ghc/compiler/hsSyn/HsExpr.hi-boot-6
+++ b/ghc/compiler/hsSyn/HsExpr.hi-boot-6
@@ -1,14 +1,22 @@
 module HsExpr where
 
 data HsExpr i
-data Match a
+data HsSplice i
+data MatchGroup a
 data GRHSs a
 
+type LHsExpr a = SrcLoc.Located (HsExpr a)
+type SyntaxExpr a = HsExpr a
+type PostTcExpr = HsExpr Var.Id
+
 pprExpr :: (Outputable.OutputableBndr i) => 
        HsExpr.HsExpr i -> Outputable.SDoc
 
-pprPatBind :: (Outputable.OutputableBndr i) => 
-       HsPat.Pat i -> HsExpr.GRHSs i -> Outputable.SDoc
+pprSplice :: (Outputable.OutputableBndr i) => 
+       HsExpr.HsSplice i -> Outputable.SDoc
+
+pprPatBind :: (Outputable.OutputableBndr b, Outputable.OutputableBndr i) => 
+       HsPat.LPat b -> HsExpr.GRHSs i -> Outputable.SDoc
 
 pprFunBind :: (Outputable.OutputableBndr i) => 
-       i -> [HsExpr.Match i] -> Outputable.SDoc
+       i -> HsExpr.MatchGroup i -> Outputable.SDoc