module GHC.Driver.Config.HsToCore.Usage ( initUsageConfig ) where import GHC.Driver.Env.Types import GHC.Driver.Session import GHC.HsToCore.Usage initUsageConfig :: HscEnv -> UsageConfig initUsageConfig :: HscEnv -> UsageConfig initUsageConfig HscEnv hsc_env = UsageConfig { uc_safe_implicit_imps_req :: Bool uc_safe_implicit_imps_req = DynFlags -> Bool safeImplicitImpsReq (HscEnv -> DynFlags hsc_dflags HscEnv hsc_env) }