diff options
| author | Sebastian Graf <sebastian.graf@kit.edu> | 2020-07-03 18:32:36 +0200 |
|---|---|---|
| committer | Krzysztof Gogolewski <krzysztof.gogolewski@tweag.io> | 2020-09-01 17:33:36 +0200 |
| commit | 2c906b385b4c6453c72260c87aaa48cb11c40098 (patch) | |
| tree | 68f5ca6e3dae2927825358a2022fd0e4b6cba02e /compiler/GHC/Runtime | |
| parent | 4517a38215eb72a4824c72d97377b9325059bf55 (diff) | |
| download | haskell-wip/mono-local-binds.tar.gz | |
Turn on -XMonoLocalBinds by default (#18430)wip/mono-local-binds
And fix the resulting type errors.
Co-authored-by: Krzysztof Gogolewski <krz.gogolewski@gmail.com>
Metric Decrease:
parsing001
Diffstat (limited to 'compiler/GHC/Runtime')
| -rw-r--r-- | compiler/GHC/Runtime/Linker.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/compiler/GHC/Runtime/Linker.hs b/compiler/GHC/Runtime/Linker.hs index 4a3b03e5eb..6e0663b029 100644 --- a/compiler/GHC/Runtime/Linker.hs +++ b/compiler/GHC/Runtime/Linker.hs @@ -1134,6 +1134,7 @@ unload_wkr hsc_env keep_linkables pls@PersistentLinkerState{..} = do -- Note that we want to remove all *local* -- (i.e. non-isExternal) names too (these are the -- temporary bindings from the command line). + keep_name :: (Name, a) -> Bool keep_name (n,_) = isExternalName n && nameModule n `elemModuleSet` bcos_retained |