diff options
| author | Ben Gamari <ben@smart-cactus.org> | 2022-12-04 16:41:15 -0500 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2023-03-08 15:02:31 -0500 |
| commit | 5d3232baa78dd6f00fc040f75d8e9a8075bfbc07 (patch) | |
| tree | d6b5fda991dcc23328b48ff43105cfc3378ea718 /rts | |
| parent | 0baa8752aaefe80ca428fbfa0cbd4e620d67e1a7 (diff) | |
| download | haskell-5d3232baa78dd6f00fc040f75d8e9a8075bfbc07.tar.gz | |
nonmoving: Don't push if nonmoving collector isn't enabled
Diffstat (limited to 'rts')
| -rw-r--r-- | rts/sm/NonMoving.h | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/sm/NonMoving.h b/rts/sm/NonMoving.h index 5be85788d7..91144f6f9b 100644 --- a/rts/sm/NonMoving.h +++ b/rts/sm/NonMoving.h @@ -346,7 +346,7 @@ INLINE_HEADER bool nonmovingClosureBeingSwept(StgClosure *p) INLINE_HEADER bool isNonmovingClosure(StgClosure *p) { - return !HEAP_ALLOCED_GC(p) || Bdescr((P_)p)->flags & BF_NONMOVING; + return RtsFlags.GcFlags.useNonmoving && (!HEAP_ALLOCED_GC(p) || Bdescr((P_)p)->flags & BF_NONMOVING); } #if defined(DEBUG) |