summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMatthew Pickering <matthewtpickering@gmail.com>2022-05-16 14:18:22 +0100
committerMatthew Pickering <matthewtpickering@gmail.com>2022-05-16 14:19:36 +0100
commit086634fc979467457ae522b5ca23ec126a0596f7 (patch)
treeaa9b8e4d67847aa4fab945238e5108aca01d133c
parent93153aab656f173ac36e0c3c2b4835caaa55669b (diff)
downloadhaskell-086634fc979467457ae522b5ca23ec126a0596f7.tar.gz
hadrian: Don't attempt to build dynamic profiling librarieswip/t21567
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
-rw-r--r--hadrian/src/Flavour.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/hadrian/src/Flavour.hs b/hadrian/src/Flavour.hs
index f63adc1ae0..a50d079594 100644
--- a/hadrian/src/Flavour.hs
+++ b/hadrian/src/Flavour.hs
@@ -190,7 +190,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)
}