X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2FhsSyn%2FHsExpr.hi-boot-5;h=bf952e3fdfc5f65c2ae94c6d7cfee6a839eaf4a2;hb=670eeb0943203da447b1f3705a3880267f42c814;hp=ed46c0992ebefa53536ae98215c672a9d036014a;hpb=982006447ff7b8aa264bc018568e891313916d4d;p=ghc-hetmet.git

diff --git a/ghc/compiler/hsSyn/HsExpr.hi-boot-5 b/ghc/compiler/hsSyn/HsExpr.hi-boot-5
index ed46c09..bf952e3 100644
--- a/ghc/compiler/hsSyn/HsExpr.hi-boot-5
+++ b/ghc/compiler/hsSyn/HsExpr.hi-boot-5
@@ -1,4 +1,12 @@
 __interface HsExpr 1 0 where
-__export HsExpr HsExpr pprExpr;
+__export HsExpr HsExpr pprExpr Match GRHSs pprPatBind pprFunBind ;
+
 1 data HsExpr i p ;
-1 pprExpr :: __forall [_i _p] {Name.NamedThing _i, Outputable.Outputable _i, Outputable.Outputable _p} => HsExpr.HsExpr _i _p -> Outputable.SDoc ;
+1 pprExpr :: __forall [i p] {Outputable.Outputable i, Outputable.Outputable p} => HsExpr.HsExpr i p -> Outputable.SDoc ;
+
+1 data Match a b ;
+1 data GRHSs a b ;
+
+1 pprPatBind :: __forall [i p] {Outputable.Outputable i, Outputable.Outputable p} => p -> HsExpr.GRHSs i p -> Outputable.SDoc ;
+1 pprFunBind :: __forall [i p] {Outputable.Outputable i, Outputable.Outputable p} => i -> [HsExpr.Match i p] -> Outputable.SDoc ;
+