Make -fliberate-case work for GADTs

[ghc-hetmet.git] / ghc / compiler / typecheck / TcExpr.hi-boot-5

diff --git a/ghc/compiler/typecheck/TcExpr.hi-boot-5 b/ghc/compiler/typecheck/TcExpr.hi-boot-5
index a56c7bc..14714cd 100644 (file)
--- a/ghc/compiler/typecheck/TcExpr.hi-boot-5
+++ b/ghc/compiler/typecheck/TcExpr.hi-boot-5
@@ -1,6 +1,16 @@
 __interface TcExpr 1 0 where
-__export TcExpr tcExpr ;
-1 tcExpr :: __forall [s] => 
-         RnHsSyn.RenamedHsExpr
-       -> TcMonad.TcType
-       -> TcMonad.TcM s (TcHsSyn.TcExpr, Inst.LIE) ;
+__export TcExpr tcCheckSigma tcCheckRho tcMonoExpr ;
+1 tcCheckSigma :: 
+         HsExpr.LHsExpr Name.Name
+       -> TcType.TcType
+       -> TcRnTypes.TcM (HsExpr.LHsExpr Var.Id) ;
+
+1 tcCheckRho :: 
+         HsExpr.LHsExpr Name.Name
+       -> TcType.TcType
+       -> TcRnTypes.TcM (HsExpr.LHsExpr Var.Id) ;
+
+1 tcMonoExpr :: 
+         HsExpr.LHsExpr Name.Name
+       -> TcUnify.Expected TcType.TcType
+       -> TcRnTypes.TcM (HsExpr.LHsExpr Var.Id) ;