summaryrefslogtreecommitdiff
path: root/rts
diff options
context:
space:
mode:
authorBen Gamari <ben@smart-cactus.org>2023-03-09 10:07:27 -0500
committerBen Gamari <ben@smart-cactus.org>2023-04-24 06:00:39 -0400
commitc9642199c6973a00d425f4a83f13faf4cd3787e0 (patch)
treeab4100a773ca1a962570818a0fa5810adc871336 /rts
parentadd3ee5d9d2b7ccfeb325a8e3a67a48bb56500ee (diff)
downloadhaskell-c9642199c6973a00d425f4a83f13faf4cd3787e0.tar.gz
rts: Silence spurious data races in ticky counters
Previously we would use non-atomic accesses when bumping ticky counters, which would result in spurious data race reports from ThreadSanitizer when the threaded RTS was in use.
Diffstat (limited to 'rts')
-rw-r--r--rts/include/Cmm.h2
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/include/Cmm.h b/rts/include/Cmm.h
index 15df6d0df1..688a5cf458 100644
--- a/rts/include/Cmm.h
+++ b/rts/include/Cmm.h
@@ -695,7 +695,7 @@
-------------------------------------------------------------------------- */
#if defined(TICKY_TICKY)
-#define TICK_BUMP_BY(ctr,n) W_[ctr] = W_[ctr] + n
+#define TICK_BUMP_BY(ctr,n) %relaxed W_[ctr] = %relaxed W_[ctr] + n
#else
#define TICK_BUMP_BY(ctr,n) /* nothing */
#endif