diff options
| author | Ben Gamari <ben@smart-cactus.org> | 2020-05-29 23:05:10 -0400 |
|---|---|---|
| committer | Ben Gamari <ben@smart-cactus.org> | 2020-11-01 13:57:10 -0500 |
| commit | 1a184ceb8d4c3093fe1a8a5085a747943274a8d9 (patch) | |
| tree | a752e2b5c192cd8daac51a24e2e21259bf2cae53 /rts/sm/GC.c | |
| parent | e63db32c7eb089985a1a7279a0a886a32d70ac0e (diff) | |
| download | haskell-wip/perform-blocking-gc.tar.gz | |
rts: Introduce performBlockingMajorGCwip/perform-blocking-gc
Diffstat (limited to 'rts/sm/GC.c')
| -rw-r--r-- | rts/sm/GC.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/rts/sm/GC.c b/rts/sm/GC.c index c39dcc2e89..fc9146c2fa 100644 --- a/rts/sm/GC.c +++ b/rts/sm/GC.c @@ -196,6 +196,7 @@ void GarbageCollect (uint32_t collect_gen, const bool do_heap_census, const bool deadlock_detect, + const bool force_nonconcurrent, uint32_t gc_type USED_IF_THREADS, Capability *cap, bool idle_cap[]) @@ -779,7 +780,7 @@ GarbageCollect (uint32_t collect_gen, // upd_rem_set nonmovingAddUpdRemSetBlocks(&gct->cap->upd_rem_set.queue); #endif - nonmovingCollect(&dead_weak_ptr_list, &resurrected_threads); + nonmovingCollect(&dead_weak_ptr_list, &resurrected_threads, force_nonconcurrent); ACQUIRE_SM_LOCK; } |