X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2FhsSyn%2FHsExpr.hi-boot-6;h=62b1306a9ebb980a726bca1abf91eee7fa1231e6;hb=4c6a3f787abcaed009a574196d82237d9ae64fc8;hp=40e18ef971dfb17d1c8f4f88bb5511d1bd8e7e51;hpb=0065d5ab628975892cea1ec7303f968c3338cbe1;p=ghc-hetmet.git

diff --git a/compiler/hsSyn/HsExpr.hi-boot-6 b/compiler/hsSyn/HsExpr.hi-boot-6
index 40e18ef..62b1306 100644
--- a/compiler/hsSyn/HsExpr.hi-boot-6
+++ b/compiler/hsSyn/HsExpr.hi-boot-6
@@ -9,6 +9,9 @@ type LHsExpr a = SrcLoc.Located (HsExpr a)
 type SyntaxExpr a = HsExpr a
 type PostTcExpr = HsExpr Var.Id
 
+pprLExpr :: (Outputable.OutputableBndr i) => 
+	LHsExpr i -> Outputable.SDoc
+
 pprExpr :: (Outputable.OutputableBndr i) => 
 	HsExpr.HsExpr i -> Outputable.SDoc
 
@@ -18,5 +21,5 @@ pprSplice :: (Outputable.OutputableBndr i) =>
 pprPatBind :: (Outputable.OutputableBndr b, Outputable.OutputableBndr i) => 
 	HsPat.LPat b -> HsExpr.GRHSs i -> Outputable.SDoc
 
-pprFunBind :: (Outputable.OutputableBndr i) => 
-	i -> HsExpr.MatchGroup i -> Outputable.SDoc
+pprFunBind :: (Outputable.OutputableBndr idL, Outputable.OutputableBndr idR) => 
+	idL -> GHC.Base.Bool -> HsExpr.MatchGroup idR -> Outputable.SDoc