diff options
| author | Matthew Pickering <matthewtpickering@gmail.com> | 2022-05-16 14:18:22 +0100 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2022-05-19 04:59:03 -0400 |
| commit | 02d1633466733f154753753c8d9e94062d334b1a (patch) | |
| tree | fb954f9c83651f636a9df2db518451bcc78e3710 /hadrian | |
| parent | 209d7c699225f5e9b8acbf9e50711165a37a91ed (diff) | |
| download | haskell-02d1633466733f154753753c8d9e94062d334b1a.tar.gz | |
hadrian: Don't attempt to build dynamic profiling libraries
We only support building static profiling libraries, the transformer was
requesting things like a dynamic, threaded, debug, profiling RTS, which
we have never produced nor distributed.
Fixes #21567
Diffstat (limited to 'hadrian')
| -rw-r--r-- | hadrian/src/Flavour.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/hadrian/src/Flavour.hs b/hadrian/src/Flavour.hs index 3b5944c6c3..46fdd9abaf 100644 --- a/hadrian/src/Flavour.hs +++ b/hadrian/src/Flavour.hs @@ -203,7 +203,7 @@ enableProfiledGhc :: Flavour -> Flavour enableProfiledGhc flavour = enableLateCCS flavour { rtsWays = do ws <- rtsWays flavour - pure $ (Set.map (\w -> w <> profiling) ws) <> ws + pure $ (Set.map (\w -> if wayUnit Dynamic w then w else w <> profiling) ws) <> ws , libraryWays = (Set.singleton profiling <>) <$> (libraryWays flavour) , ghcProfiled = (>= Stage1) } |