blob: 70d891dcbf89f1ffb15ecc0693a799259561143e (
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]
-> ([Name] -> RnM (thing, FreeVars))
-> RnM (([LStmt Name], thing), FreeVars)
\end{code}
|