blob: b03f50a89023f82e3ed7b61233ed82802a004182 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
\begin{code}
module RnExpr where
import HsSyn
import Name ( Name )
import NameSet ( FreeVars )
import RdrName ( RdrName )
import TcRnTypes
rnLExpr :: LHsExpr RdrName
-> RnM (LHsExpr Name, FreeVars)
rnStmts :: forall thing.
HsStmtContext Name -> [LStmt RdrName]
-> RnM (thing, FreeVars)
-> RnM (([LStmt Name], thing), FreeVars)
\end{code}
|