[project @ 2003-12-10 14:15:16 by simonmar]

[ghc-hetmet.git] / ghc / compiler / typecheck / TcMatches.hi-boot-6

diff --git a/ghc/compiler/typecheck/TcMatches.hi-boot-6 b/ghc/compiler/typecheck/TcMatches.hi-boot-6
index a8190d9..25d13a5 100644 (file)
--- a/ghc/compiler/typecheck/TcMatches.hi-boot-6
+++ b/ghc/compiler/typecheck/TcMatches.hi-boot-6
@@ -1,13 +1,10 @@
-__interface TcMatches 1 0 where
-__export TcMatches tcGRHSs tcMatchesFun;
-1 tcGRHSs ::  HsExpr.HsMatchContext Name.Name
-             -> RnHsSyn.RenamedGRHSs
-             -> TcType.TcType
-             -> TcMonad.TcM (TcHsSyn.TcGRHSs, Inst.LIE) ;
-1 tcMatchesFun :: 
-               [(Name.Name,Var.Id)]
-            -> Name.Name
-            -> TcType.TcType
-            -> [RnHsSyn.RenamedMatch]
-            -> TcMonad.TcM ([TcHsSyn.TcMatch], Inst.LIE) ;
+module TcMatches where
 
+tcGRHSsPat    :: HsExpr.GRHSs Name.Name
+             -> TcUnify.Expected TcType.TcType
+             -> TcRnTypes.TcM (HsExpr.GRHSs Var.Id)
+
+tcMatchesFun :: Name.Name
+            -> [HsExpr.LMatch Name.Name]
+            -> TcUnify.Expected TcType.TcType
+            -> TcRnTypes.TcM [HsExpr.LMatch Var.Id]