{-# LANGUAGE CPP #-} {-# LANGUAGE RecordWildCards #-} module HIndent.GhcLibParserWrapper.GHC.Hs.ImpExp ( module GHC.Hs.ImpExp , getPackageName ) where import qualified GHC.Hs as GHC import GHC.Hs.ImpExp import qualified GHC.Types.SourceText as GHC #if MIN_VERSION_ghc_lib_parser(9, 4, 1) import qualified GHC.Types.PkgQual as GHC #endif getPackageName :: GHC.ImportDecl GHC.GhcPs -> Maybe GHC.StringLiteral #if MIN_VERSION_ghc_lib_parser(9, 4, 1) getPackageName :: ImportDecl GhcPs -> Maybe StringLiteral getPackageName GHC.ImportDecl {ideclPkgQual :: forall pass. ImportDecl pass -> ImportDeclPkgQual pass GHC.ideclPkgQual = GHC.RawPkgQual StringLiteral name} = StringLiteral -> Maybe StringLiteral forall a. a -> Maybe a Just StringLiteral name getPackageName GHC.ImportDecl {ideclPkgQual :: forall pass. ImportDecl pass -> ImportDeclPkgQual pass GHC.ideclPkgQual = ImportDeclPkgQual GhcPs RawPkgQual GHC.NoRawPkgQual} = Maybe StringLiteral forall a. Maybe a Nothing #else getPackageName GHC.ImportDecl {..} = ideclPkgQual #endif