Fcalva/cyclone
1
0
Fork 0
mirror of https://github.com/justinethier/cyclone.git synced 2025-05-23 20:15:05 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Loop over allocated space

Browse source
This commit is contained in:
Justin Ethier 2015-10-17 02:14:01 -04:00
parent dfdfd52a54
commit 5ed84d5332
1 changed files with 16 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

19
runtime.c
View file

@ -2455,10 +2455,23 @@ void GC(cont, args, num_args) closure cont; object *args; int num_args;
}
clear_mutations(); // Reset for next time
// TODO: use a bump pointer to keep track of who was moved
// probably need to do this as part of gc_move2heap
// Check allocated objects, moving additional objects as needed
while (scani < alloci) {
object obj = Cyc_thread->moveBuf[scani];
switch(type_of(obj)) {
case cons_tag: {
gc_move2heap(car(obj));
gc_move2heap(cdr(obj));
}
// TODO: other types to move
default:
fprintf(stderr,
"GC: unexpected object type %ld for object %p\n", type_of(obj), obj);
exit(1);
}
scani++;
}
// TODO: scan bump pointer space, moving additional objects as needed
// TODO: at some point during all of this, check the 'major GC' flag
// to see if we need to do a gc_collect