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)
  }