X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Ftypecheck%2FTcExpr.hi-boot-6;h=f5d0d50e511d25b01b4a7b3f9a28fd28c17c7d0a;hb=10ab808b4c8575f62bcc7998e5ab45fa0e0d33c5;hp=6cafd0265b33d6ffbcf0cd49d527bbf83e67e739;hpb=1a6810f82a831df06775ff78530c98dfd9ea3b2d;p=ghc-hetmet.git

diff --git a/ghc/compiler/typecheck/TcExpr.hi-boot-6 b/ghc/compiler/typecheck/TcExpr.hi-boot-6
index 6cafd02..f5d0d50 100644
--- a/ghc/compiler/typecheck/TcExpr.hi-boot-6
+++ b/ghc/compiler/typecheck/TcExpr.hi-boot-6
@@ -1,10 +1,16 @@
-__interface TcExpr 1 0 where
-__export TcExpr tcExpr tcMonoExpr ;
-1 tcExpr :: 
-	  RnHsSyn.RenamedHsExpr
+module TcExpr where
+
+tcCheckSigma :: 
+	  HsExpr.LHsExpr Name.Name
        -> TcType.TcType
-       -> TcMonad.TcM (TcHsSyn.TcExpr, Inst.LIE) ;
-1 tcMonoExpr :: 
-	  RnHsSyn.RenamedHsExpr
+       -> TcRnTypes.TcM (HsExpr.LHsExpr Var.Id)
+
+tcCheckRho :: 
+  	  HsExpr.LHsExpr Name.Name
        -> TcType.TcType
-       -> TcMonad.TcM (TcHsSyn.TcExpr, Inst.LIE) ;
+       -> TcRnTypes.TcM (HsExpr.LHsExpr Var.Id)
+
+tcMonoExpr :: 
+  	  HsExpr.LHsExpr Name.Name
+       -> TcUnify.Expected TcType.TcType
+       -> TcRnTypes.TcM (HsExpr.LHsExpr Var.Id)