X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Ftypecheck%2FTcExpr.hi-boot-6;h=a7dc32d6eab164cc69a3f111299ed64b12e8d601;hb=1159c0c06db593588cfae24e47a80e71c51c6129;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..a7dc32d 100644
--- a/ghc/compiler/typecheck/TcExpr.hi-boot-6
+++ b/ghc/compiler/typecheck/TcExpr.hi-boot-6
@@ -1,10 +1,26 @@
-__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)
+
+tcInferRho :: 
+  	  HsExpr.LHsExpr Name.Name
+       -> TcRnTypes.TcM (HsExpr.LHsExpr Var.Id, TcType.TcType)
+
+tcMonoExpr :: 
+  	  HsExpr.LHsExpr Name.Name
+       -> TcType.Expected TcType.TcType
+       -> TcRnTypes.TcM (HsExpr.LHsExpr Var.Id)
+
+tcSyntaxOp :: 
+	  TcRnTypes.InstOrigin
+       -> HsExpr.HsExpr Name.Name
+       -> TcType.TcType
+       -> TcRnTypes.TcM (HsExpr.HsExpr Var.Id)