diff --git a/bin/ikarus b/bin/ikarus index 0c361e5..ca38c48 100755 Binary files a/bin/ikarus and b/bin/ikarus differ diff --git a/bin/ikarus-collect.c b/bin/ikarus-collect.c index 88331a4..a4239ee 100644 --- a/bin/ikarus-collect.c +++ b/bin/ikarus-collect.c @@ -635,12 +635,12 @@ forward_guardians(gc_t* gc){ while(src){ int i; int n = src->count; - for(i=0; iptr[i], "prot"); - dst = move_guarded(a, dst); - } ik_ptr_page* next = src->next; - ik_munmap(src, sizeof(ik_ptr_page)); + src->next = dst; + dst = src; + for(i=0; iptr[i] = add_object(gc, src->ptr[i], "prot"); + } src = next; } pcb->guardians[next_gen(gen)] = dst;