X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Ftypecheck%2FTcMatches.hi-boot;h=1ec6b1804276581f7e94b3c7632f299c95743374;hb=2c6d73e2ca9a545c4295c6f532cd3612e7fd3d8d;hp=593f18edccb829d22bcfee6f48ca10a1966e0e06;hpb=0004357ccaa3149cb112f5f5df1af60e65baad79;p=ghc-hetmet.git

diff --git a/ghc/compiler/typecheck/TcMatches.hi-boot b/ghc/compiler/typecheck/TcMatches.hi-boot
index 593f18e..1ec6b18 100644
--- a/ghc/compiler/typecheck/TcMatches.hi-boot
+++ b/ghc/compiler/typecheck/TcMatches.hi-boot
@@ -3,9 +3,9 @@ _exports_
 TcMatches tcGRHSs tcMatchesFun;
 _declarations_
 2 tcGRHSs _:_ _forall_ [s] => 
-	      RnHsSyn.RenamedGRHSs
+	      HsExpr.HsMatchContext Name.Name
+	      -> RnHsSyn.RenamedGRHSs
 	      -> TcMonad.TcType
-	      -> HsExpr.HsMatchContext
 	      -> TcMonad.TcM s (TcHsSyn.TcGRHSs, Inst.LIE) ;;
 3 tcMatchesFun _:_ _forall_ [s] => 
 		[(Name.Name,Var.Id)]