summaryrefslogtreecommitdiff
path: root/rts/Timer.c
diff options
context:
space:
mode:
authorBen Gamari <ben@smart-cactus.org>2019-11-22 11:58:32 -0500
committerBen Gamari <ben@smart-cactus.org>2020-10-24 21:02:22 -0400
commit01d9552509a94d1bd1a717f1730b1c513bf7fea8 (patch)
tree341d97e220140b0d796ac07daf4f631d05eab700 /rts/Timer.c
parent5a98dfcae41b79bed912521d1eeb2cbc09f0742b (diff)
downloadhaskell-01d9552509a94d1bd1a717f1730b1c513bf7fea8.tar.gz
Fix #17289
Diffstat (limited to 'rts/Timer.c')
-rw-r--r--rts/Timer.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/rts/Timer.c b/rts/Timer.c
index 63854d7dda..fa7679e80c 100644
--- a/rts/Timer.c
+++ b/rts/Timer.c
@@ -102,7 +102,7 @@ handle_tick(int unused STG_UNUSED)
{
handleProfTick();
if (RtsFlags.ConcFlags.ctxtSwitchTicks > 0
- && RELAXED_LOAD(&timer_disabled) == 0)
+ && SEQ_CST_LOAD(&timer_disabled) == 0)
{
ticks_to_ctxt_switch--;
if (ticks_to_ctxt_switch <= 0) {
@@ -166,7 +166,7 @@ initTimer(void)
if (RtsFlags.MiscFlags.tickInterval != 0) {
initTicker(RtsFlags.MiscFlags.tickInterval, handle_tick);
}
- RELAXED_STORE(&timer_disabled, 1);
+ SEQ_CST_STORE(&timer_disabled, 1);
}
void