[project @ 2003-09-23 15:10:23 by simonpj]

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

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