{-# GHC_PRAGMA INTERFACE VERSION 5 #-} interface Rename3 where import AbsSyn(Module) import Bag(Bag) import FiniteMap(FiniteMap) import HsBinds(Binds, Sig) import HsDecls(ClassDecl, DataTypeSig, DefaultDecl, FixityDecl, InstDecl, SpecialisedInstanceSig, TyDecl) import HsImpExp(IE, ImportedInterface) import HsLit(Literal) import HsPat(InPat, ProtoNamePat(..)) import Id(Id) import Maybes(Labda) import Name(Name) import NameTypes(FullName, ShortName) import Outputable(ExportFlag) import PreludePS(_PackedString) import Pretty(PprStyle, Pretty(..), PrettyRep) import ProtoName(ProtoName) import RenameAuxFuns(PreludeNameFun(..), PreludeNameFuns(..)) import RenameMonad3(Rn3M(..), initRn3) import SplitUniq(SplitUniqSupply) import SrcLoc(SrcLoc) import TyCon(TyCon) import Unique(Unique) data Module a b data Bag a data InPat a type ProtoNamePat = InPat ProtoName data Labda a data Name data ExportFlag data PprStyle type Pretty = Int -> Bool -> PrettyRep data PrettyRep data ProtoName type PreludeNameFun = _PackedString -> Labda Name type PreludeNameFuns = (_PackedString -> Labda Name, _PackedString -> Labda Name) type Rn3M a = (FiniteMap _PackedString ExportFlag, FiniteMap _PackedString ()) -> _PackedString -> SplitUniqSupply -> a data SplitUniqSupply initRn3 :: ((FiniteMap _PackedString ExportFlag, FiniteMap _PackedString ()) -> _PackedString -> SplitUniqSupply -> a) -> SplitUniqSupply -> a rnModule3 :: (_PackedString -> Labda Name, _PackedString -> Labda Name) -> [_PackedString] -> Module ProtoName (InPat ProtoName) -> (FiniteMap _PackedString ExportFlag, FiniteMap _PackedString ()) -> _PackedString -> SplitUniqSupply -> ([(ProtoName, Name)], [(ProtoName, Name)], ProtoName -> Labda Name, ProtoName -> Labda Name, Bag (PprStyle -> Int -> Bool -> PrettyRep))