summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBen Gamari <ben@smart-cactus.org>2022-11-21 16:14:33 -0500
committerBen Gamari <ben@smart-cactus.org>2022-12-05 18:43:26 -0500
commit1ee07a55baba4c9cd1f268f5e9fdfe1b6b98bf00 (patch)
treef6e5f6c3c2df09de708f43137a2c9d106ea2151f
parent938d6176cb1a3098886f47a3de893ea9401f1f09 (diff)
downloadhaskell-1ee07a55baba4c9cd1f268f5e9fdfe1b6b98bf00.tar.gz
hadrian: Enable Cmm instrumentation in TSAN flavour
-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 c84ffba545..9c28397b31 100644
--- a/hadrian/src/Flavour.hs
+++ b/hadrian/src/Flavour.hs
@@ -207,7 +207,7 @@ splitSections = splitSectionsIf (/=ghc)
-- configure with @--disable-large-address-space@ when using this.
enableThreadSanitizer :: Flavour -> Flavour
enableThreadSanitizer = addArgs $ notStage0 ? mconcat
- [ builder (Ghc CompileHs) ? arg "-optc-fsanitize=thread"
+ [ builder (Ghc CompileHs) ? (arg "-optc-fsanitize=thread" <> arg "-fcmm-thread-sanitizer")
, builder (Ghc CompileCWithGhc) ? arg "-optc-fsanitize=thread"
, builder (Ghc LinkHs) ? (arg "-optc-fsanitize=thread" <> arg "-optl-fsanitize=thread")
, builder Cc ? arg "-fsanitize=thread"