\begin{code}
module TcMatches where
-import HsSyn ( GRHSs, MatchGroup, ExprCoFn )
+import HsSyn ( GRHSs, MatchGroup, HsWrapper )
import Name ( Name )
import TcType ( BoxyRhoType )
import TcRnTypes( TcM, TcId )
-> BoxyRhoType
-> TcM (GRHSs TcId)
-tcMatchesFun :: Name
+tcMatchesFun :: Name -> Bool
-> MatchGroup Name
-> BoxyRhoType
- -> TcM (ExprCoFn, MatchGroup TcId)
+ -> TcM (HsWrapper, MatchGroup TcId)
\end{code}