conservatory
/
picrin
4
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

sweep objects from base pointer (not from freep)

This commit is contained in:
Yuichi Nishiwaki 2013-10-14 17:34:04 +09:00
parent a7cc9bd69d
commit c706d4f326
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/gc.c
View File

@ -212,10 +212,12 @@ gc_finalize_object(pic_state *pic, struct pic_object *obj)
static void static void
gc_sweep_phase(pic_state *pic) gc_sweep_phase(pic_state *pic)
{ {
union header *freep, *bp, *p; union header *base, *bp, *p;
freep = pic->heap->freep; freep = pic->heap->freep;
for (p = freep; p != freep; p = p->s.ptr) { for (p = freep; p != freep; p = p->s.ptr) {
base = pic->heap->base;
for (p = base->s.ptr; p != base; p = p->s.ptr) {
for (bp = p + p->s.size; bp != p->s.ptr; bp += bp->s.size) { for (bp = p + p->s.size; bp != p->s.ptr; bp += bp->s.size) {
if (is_marked(bp)) { if (is_marked(bp)) {
gc_unmark(bp); gc_unmark(bp);