diff options
| author | Teo Camarasu <teofilcamarasu@gmail.com> | 2021-10-04 11:40:51 +0100 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2021-10-07 03:41:27 -0400 |
| commit | 6215728705f481861450cc197e5fbcfbf2c1a63f (patch) | |
| tree | e83061f811904309844b326490a0c8e359f70f8c /rts/sm | |
| parent | 75a766a362629a1b312ba9b95d2c41f91c3b20a5 (diff) | |
| download | haskell-6215728705f481861450cc197e5fbcfbf2c1a63f.tar.gz | |
fix non-moving gc heap space requirements estimate
The space requirements of the non-moving gc are comparable to the
compacting gc, not the copying gc.
The copying gc requires a much larger overhead.
Fixes #20475
Diffstat (limited to 'rts/sm')
| -rw-r--r-- | rts/sm/GC.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/sm/GC.c b/rts/sm/GC.c index 90a5164414..1799cf98c4 100644 --- a/rts/sm/GC.c +++ b/rts/sm/GC.c @@ -1963,7 +1963,7 @@ resizeGenerations (void) heapOverflow(); } - if (oldest_gen->compact) { + if (oldest_gen->compact || RtsFlags.GcFlags.useNonmoving) { if ( (size + (size - 1) * (gens - 2) * 2) + min_alloc > max ) { size = (max - min_alloc) / ((gens - 1) * 2 - 1); } |