summaryrefslogtreecommitdiff
path: root/compiler/GHC/Driver/Config
diff options
context:
space:
mode:
authorAndre Marianiello <andremarianiello@users.noreply.github.com>2022-05-14 16:02:06 -0400
committerMarge Bot <ben+marge-bot@smart-cactus.org>2022-05-25 01:36:09 -0400
commit9973c0167c266dad1c9c6f2b96dbba3c29c22062 (patch)
treef2ea79ae9edacb51d7c8a815cf794f9f248eb73c /compiler/GHC/Driver/Config
parentcfb9faff791064fab1b308b08b6ec1be288a4675 (diff)
downloadhaskell-9973c0167c266dad1c9c6f2b96dbba3c29c22062.tar.gz
Remove HscEnv from GHC.HsToCore.Usage (related to #17957)
Metric Decrease: T16875
Diffstat (limited to 'compiler/GHC/Driver/Config')
-rw-r--r--compiler/GHC/Driver/Config/HsToCore/Usage.hs14
1 files changed, 14 insertions, 0 deletions
diff --git a/compiler/GHC/Driver/Config/HsToCore/Usage.hs b/compiler/GHC/Driver/Config/HsToCore/Usage.hs
new file mode 100644
index 0000000000..b5e0dbc374
--- /dev/null
+++ b/compiler/GHC/Driver/Config/HsToCore/Usage.hs
@@ -0,0 +1,14 @@
+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 hsc_env = UsageConfig
+ { uc_safe_implicit_imps_req = safeImplicitImpsReq (hsc_dflags hsc_env)
+ }