__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) ;
+__export TcMatches tcGRHSsPat tcMatchesFun;
+1 tcGRHSsPat :: HsExpr.GRHSs Name.Name
+ -> TcUnify.Expected TcType.TcType
+ -> TcRnTypes.TcM (HsExpr.GRHSs Var.Id) ;
+1 tcMatchesFun :: Name.Name
+ -> [HsExpr.LMatch Name.Name]
+ -> TcUnify.Expected TcType.TcType
+ -> TcRnTypes.TcM [HsExpr.LMatch Var.Id] ;