diff options
| author | Sylvain Henry <sylvain@haskus.fr> | 2020-09-01 18:18:15 +0200 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2020-10-09 08:42:31 -0400 |
| commit | accdb24a086b80fe74776246aa33bce5a920e3c8 (patch) | |
| tree | 1204e3b93332d6f54d2b5f71cc2794bdc9bd4a2d /compiler/GHC/Runtime | |
| parent | fd984d68e5ec4b04bc79395c099434e653eb1060 (diff) | |
| download | haskell-accdb24a086b80fe74776246aa33bce5a920e3c8.tar.gz | |
Expose RTS-only ways (#18651)
Some RTS ways are exposed via settings (ghcThreaded, ghcDebugged) but
not all. It's simpler if the RTS exposes them all itself.
Diffstat (limited to 'compiler/GHC/Runtime')
| -rw-r--r-- | compiler/GHC/Runtime/Linker.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/GHC/Runtime/Linker.hs b/compiler/GHC/Runtime/Linker.hs index 9ab708e13d..5d0eb3c467 100644 --- a/compiler/GHC/Runtime/Linker.hs +++ b/compiler/GHC/Runtime/Linker.hs @@ -596,7 +596,7 @@ checkNonStdWay hsc_env srcspan | otherwise = return (Just (hostWayTag ++ "o")) where - targetFullWays = Set.filter (not . wayRTSOnly) (ways (hsc_dflags hsc_env)) + targetFullWays = fullWays (ways (hsc_dflags hsc_env)) hostWayTag = case waysTag hostFullWays of "" -> "" tag -> tag ++ "_" |