__interface TcMatches 1 0 where
__export TcMatches tcGRHSs tcMatchesFun;
-1 tcGRHSs :: __forall [s] =>
- RnHsSyn.RenamedGRHSs
- -> TcMonad.TcType
- -> HsExpr.StmtCtxt
- -> TcMonad.TcM s (TcHsSyn.TcGRHSs, Inst.LIE) ;
-1 tcMatchesFun :: __forall [s] =>
- [(Name.Name,Var.Id)]
- -> Name.Name
- -> TcMonad.TcType
+1 tcGRHSs :: HsExpr.HsMatchContext Name.Name
+ -> RnHsSyn.RenamedGRHSs
+ -> TcUnify.Expected TcType.TcType
+ -> TcRnTypes.TcM TcHsSyn.TcGRHSs ;
+1 tcMatchesFun ::
+ Name.Name
-> [RnHsSyn.RenamedMatch]
- -> TcMonad.TcM s ([TcHsSyn.TcMatch], Inst.LIE) ;
+ -> TcUnify.Expected TcType.TcType
+ -> TcRnTypes.TcM [TcHsSyn.TcMatch] ;