suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

incremental GC: fix accumulation of page-repair work

Browse Source 
Too much work was being saved for the final step of a
major GC.
This commit is contained in:
Matthew Flatt 2015-11-30 15:11:50 -07:00
parent e9c722cf22
commit d306ecdf3a
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
racket/src/racket/gc2/newgc.c
View File

@ -5408,6 +5408,8 @@ static void incremental_repair_pages(NewGC *gc, int fuel)
while (fuel && gc->inc_repair_next) { while (fuel && gc->inc_repair_next) {
page = gc->inc_repair_next; page = gc->inc_repair_next;
gc->inc_repair_next = page->inc_modified_next; gc->inc_repair_next = page->inc_modified_next;
if (!gc->inc_repair_next)
gc->inc_repair_next = gc->inc_modified_next;
GC_ASSERT(page->generation >= AGE_GEN_1); GC_ASSERT(page->generation >= AGE_GEN_1);
if (page->generation == AGE_VACATED) { if (page->generation == AGE_VACATED) {
/* skip */ /* skip */