a04866e348a921961937576abd470a031ac0ebdb
[ghc-hetmet.git] / ghc / compiler / rename / RenameAuxFuns.hi
1 {-# GHC_PRAGMA INTERFACE VERSION 5 #-}
2 interface RenameAuxFuns where
3 import Bag(Bag)
4 import Maybes(Labda)
5 import Name(Name)
6 import PreludePS(_PackedString)
7 import ProtoName(ProtoName)
8 data Bag a 
9 type GlobalNameFun = ProtoName -> Labda Name
10 type GlobalNameFuns = (ProtoName -> Labda Name, ProtoName -> Labda Name)
11 data Labda a 
12 type PreludeNameFun = _PackedString -> Labda Name
13 type PreludeNameFuns = (_PackedString -> Labda Name, _PackedString -> Labda Name)
14 data ProtoName 
15 mkGlobalNameFun :: _PackedString -> (_PackedString -> Labda Name) -> [(ProtoName, Name)] -> ProtoName -> Labda Name
16 mkNameFun :: Bag (_PackedString, a) -> (_PackedString -> Labda a, [[(_PackedString, a)]])
17