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

minor GC simplification

Browse Source
This commit is contained in:
Matthew Flatt 2015-11-25 11:42:32 -07:00
parent 37c2558475
commit e24b73fbfd
2 changed files with 2 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -576,8 +576,6 @@ static void BTC_do_accounting(NewGC *gc)
gc->old_btc_mark = gc->new_btc_mark;
gc->new_btc_mark = !gc->new_btc_mark;
}
clear_stack_pages(gc);
}
inline static void BTC_add_account_hook(int type,void *c1,void *c2,uintptr_t b)

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

@ -5666,15 +5666,6 @@ static void garbage_collect(NewGC *gc, int force_full, int no_full, int switchin
zero_weak_arrays(gc, 0);
zero_remaining_ephemerons(gc);
#ifndef NEWGC_BTC_ACCOUNT
/* we need to clear out the stack pages. If we're doing memory accounting,
though, we might as well leave them up for now and let the accounting
system clear them later. Better then freeing them, at least. If we're
not doing accounting, though, there is no "later" where they'll get
removed */
clear_stack_pages(gc);
#endif
TIME_STEP("zeroed");
check_finalizers(gc, 2);
@ -5759,6 +5750,8 @@ static void garbage_collect(NewGC *gc, int force_full, int no_full, int switchin
if (gc->gc_full || !gc->started_incremental)
check_marks_cleared(gc);
clear_stack_pages(gc);
TIME_STEP("reset");
/* now we do want the allocator freaking if we go over half */