blob: d8f0f1fc7f97c266fb74d1a9c27cad6c9a961d82 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
module RnSplice where
import GhcPrelude
import HsSyn
import TcRnMonad
import NameSet
import Kind
rnSpliceType :: HsSplice GhcPs -> PostTc GhcRn Kind
-> RnM (HsType GhcRn, FreeVars)
rnSplicePat :: HsSplice GhcPs -> RnM ( Either (Pat GhcPs) (Pat GhcRn)
, FreeVars )
rnSpliceDecl :: SpliceDecl GhcPs -> RnM (SpliceDecl GhcRn, FreeVars)
rnTopSpliceDecls :: HsSplice GhcPs -> RnM ([LHsDecl GhcPs], FreeVars)
|