From 26c3827f0b878f5bde7b5261076eb8452847fdb4 Mon Sep 17 00:00:00 2001 From: Ben Gamari Date: Sun, 19 May 2019 13:29:42 -0400 Subject: Nonmoving: Ensure write barrier vanishes in non-threaded RTS --- rts/Threads.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'rts/Threads.c') diff --git a/rts/Threads.c b/rts/Threads.c index 2b11a1eb90..8334c5a5ac 100644 --- a/rts/Threads.c +++ b/rts/Threads.c @@ -723,7 +723,7 @@ threadStackUnderflow (Capability *cap, StgTSO *tso) barf("threadStackUnderflow: not enough space for return values"); } - if (RTS_UNLIKELY(nonmoving_write_barrier_enabled)) { + IF_NONMOVING_WRITE_BARRIER_ENABLED { // ensure that values that we copy into the new stack are marked // for the nonmoving collector. Note that these values won't // necessarily form a full closure so we need to handle them -- cgit v1.2.1