[project @ 2003-06-27 21:17:24 by simonpj]

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

diff --git a/ghc/compiler/typecheck/TcMatches.hi-boot b/ghc/compiler/typecheck/TcMatches.hi-boot
index fa47d4e..cdb14ff 100644 (file)
--- a/ghc/compiler/typecheck/TcMatches.hi-boot
+++ b/ghc/compiler/typecheck/TcMatches.hi-boot
@@ -3,14 +3,13 @@ _exports_
 TcMatches tcGRHSs tcMatchesFun;
 _declarations_
 2 tcGRHSs _:_ _forall_ [s] => 
-             RnHsSyn.RenamedGRHSs
-             -> TcMonad.TcType
-             -> HsExpr.StmtCtxt
-             -> TcMonad.TcM s (TcHsSyn.TcGRHSs, Inst.LIE) ;;
+             HsExpr.HsMatchContext Name.Name
+             -> RnHsSyn.RenamedGRHSs
+             -> TcType.TcType
+             -> TcMonad.TcM s (TcHsSyn.TcGRHSs, TcMonad.LIE) ;;
 3 tcMatchesFun _:_ _forall_ [s] => 
-               [(Name.Name,Var.Id)]
-            -> Name.Name
-            -> TcMonad.TcType
+               Name.Name
+            -> TcType.TcType
             -> [RnHsSyn.RenamedMatch]
-            -> TcMonad.TcM s ([TcHsSyn.TcMatch], Inst.LIE) ;;
+            -> TcMonad.TcM s ([TcHsSyn.TcMatch], TcMonad.LIE) ;;