ghc/compiler/abstractSyn/HsImpExp.hi

   1 {-# GHC_PRAGMA INTERFACE VERSION 5 #-}
   2 interface HsImpExp where
   3 import FiniteMap(FiniteMap)
   4 import HsBinds(Sig)
   5 import HsDecls(ClassDecl, FixityDecl, InstDecl, TyDecl)
   6 import HsPat(InPat)
   7 import Name(Name)
   8 import Outputable(ExportFlag, NamedThing, Outputable)
   9 import PreludePS(_PackedString)
  10 import Pretty(PprStyle, PrettyRep)
  11 import ProtoName(ProtoName)
  12 import SrcLoc(SrcLoc)
  13 data IE   = IEVar _PackedString | IEThingAbs _PackedString | IEThingAll _PackedString | IEConWithCons _PackedString [_PackedString] | IEClsWithOps _PackedString [_PackedString] | IEModuleContents _PackedString
  14 data IfaceImportDecl   = IfaceImportDecl _PackedString [IE] [Renaming] SrcLoc
  15 type ImExportListInfo = (FiniteMap _PackedString ExportFlag, FiniteMap _PackedString ())
  16 data ImportedInterface a b   = ImportAll (Interface a b) [Renaming] | ImportSome (Interface a b) [IE] [Renaming] | ImportButHide (Interface a b) [IE] [Renaming]
  17 data Interface a b   = MkInterface _PackedString [IfaceImportDecl] [FixityDecl a] [TyDecl a] [ClassDecl a b] [InstDecl a b] [Sig a] SrcLoc
  18 type ProtoNameImportedInterface = ImportedInterface ProtoName (InPat ProtoName)
  19 type ProtoNameInterface = Interface ProtoName (InPat ProtoName)
  20 type RenamedImportedInterface = ImportedInterface Name (InPat Name)
  21 type RenamedInterface = Interface Name (InPat Name)
  22 data Renaming   = MkRenaming _PackedString _PackedString
  23 getIEStrings :: [IE] -> (FiniteMap _PackedString ExportFlag, FiniteMap _PackedString ())
  24         {-# GHC_PRAGMA _A_ 1 _U_ 2 _N_ _S_ "S" _N_ _N_ #-}
  25 getRawIEStrings :: [IE] -> ([(_PackedString, ExportFlag)], [_PackedString])
  26         {-# GHC_PRAGMA _A_ 1 _U_ 2 _N_ _S_ "S" _N_ _N_ #-}
  27 pprRenamings :: PprStyle -> [Renaming] -> Int -> Bool -> PrettyRep
  28         {-# GHC_PRAGMA _A_ 2 _U_ 2222 _N_ _S_ "LS" _N_ _N_ #-}
  29 instance Outputable IE
  30         {-# GHC_PRAGMA _M_ HsImpExp {-dfun-} _A_ 2 _N_ _N_ _N_ _F_ _IF_ARGS_ 0 0 X 1 _CONSTM_ Outputable ppr (IE) _N_
  31          ppr = _A_ 2 _U_ 0122 _N_ _S_ "AS" {_A_ 1 _U_ 122 _N_ _N_ _N_ _N_} _N_ _N_ #-}
  32 instance Outputable IfaceImportDecl
  33         {-# GHC_PRAGMA _M_ HsImpExp {-dfun-} _A_ 2 _N_ _N_ _N_ _F_ _IF_ARGS_ 0 0 X 1 _CONSTM_ Outputable ppr (IfaceImportDecl) _N_
  34          ppr = _A_ 2 _U_ 2122 _N_ _S_ "LU(LLLA)" {_A_ 4 _U_ 222222 _N_ _N_ _N_ _N_} _N_ _N_ #-}
  35 instance (NamedThing a, Outputable a, NamedThing b, Outputable b) => Outputable (ImportedInterface a b)
  36         {-# GHC_PRAGMA _M_ HsImpExp {-dfun-} _A_ 4 _U_ 2222 _N_ _N_ _N_ _N_ #-}
  37 instance (NamedThing a, Outputable a, NamedThing b, Outputable b) => Outputable (Interface a b)
  38         {-# GHC_PRAGMA _M_ HsImpExp {-dfun-} _A_ 4 _U_ 2222 _N_ _N_ _N_ _N_ #-}
  39 instance Outputable Renaming
  40         {-# GHC_PRAGMA _M_ HsImpExp {-dfun-} _A_ 2 _N_ _N_ _N_ _F_ _IF_ARGS_ 0 0 X 1 _CONSTM_ Outputable ppr (Renaming) _N_
  41          ppr = _A_ 2 _U_ 0122 _N_ _S_ "AU(LL)" {_A_ 2 _U_ 2222 _N_ _N_ _N_ _N_} _N_ _N_ #-}
  42