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