vm: record compaction events correctly
parent
47087480a9
commit
4c268f2600
|
@ -127,7 +127,11 @@ void factor_vm::collect_full(bool trace_contexts_p)
|
|||
collect_mark_impl(trace_contexts_p);
|
||||
collect_sweep_impl();
|
||||
if(data->low_memory_p())
|
||||
{
|
||||
current_gc->op = collect_compact_op;
|
||||
current_gc->event->op = collect_compact_op;
|
||||
collect_compact_impl(trace_contexts_p);
|
||||
}
|
||||
else
|
||||
update_code_heap_words_and_literals();
|
||||
}
|
||||
|
|
Loading…
Reference in New Issue