X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2FhsSyn%2FHsExpr.hi-boot;h=ecc9528d9ad9d049014865b0711c70a578043f38;hb=d4337146a2b5f737a1d1ef13dcd87d066e308387;hp=dd003096b7fcb37573ce567dac55a65e43dea599;hpb=3160f854580e6d8df412c8cd34d93bae27175d67;p=ghc-hetmet.git

diff --git a/ghc/compiler/hsSyn/HsExpr.hi-boot b/ghc/compiler/hsSyn/HsExpr.hi-boot
index dd00309..ecc9528 100644
--- a/ghc/compiler/hsSyn/HsExpr.hi-boot
+++ b/ghc/compiler/hsSyn/HsExpr.hi-boot
@@ -1,7 +1,11 @@
 _interface_ HsExpr 1
 _exports_
-HsExpr HsExpr pprExpr;
+HsExpr HsExpr pprExpr Match GRHSs pprFunBind pprPatBind ;
 _declarations_
 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] {Outputable.OutputableBndr i} => HsExpr.HsExpr i -> Outputable.SDoc ;;
 
+1 data Match a b ;
+1 data GRHSs a b ;
+1 pprPatBind _:_ _forall_ [i] {Outputable.OutputableBndr i} => HsPat.Pat i -> HsExpr.GRHSs i -> Outputable.SDoc ;;
+1 pprFunBind _:_ _forall_ [i p] {Outputable.OutputableBndr i} => i -> [HsExpr.Match i] -> Outputable.SDoc ;;