2009-10-07 16:48:09 -04:00
|
|
|
#include "master.hpp"
|
|
|
|
|
|
|
|
namespace factor
|
|
|
|
{
|
|
|
|
|
|
|
|
nursery_collector::nursery_collector(factor_vm *myvm_) :
|
|
|
|
copying_collector<aging_space,nursery_policy>
|
|
|
|
(myvm_,myvm_->data->aging,nursery_policy(myvm_)) {}
|
|
|
|
|
2009-10-08 03:10:28 -04:00
|
|
|
void factor_vm::collect_nursery()
|
2009-10-07 16:48:09 -04:00
|
|
|
{
|
2009-10-08 03:10:28 -04:00
|
|
|
nursery_collector collector(this);
|
|
|
|
|
|
|
|
collector.trace_roots();
|
|
|
|
collector.trace_contexts();
|
2009-10-09 02:37:45 -04:00
|
|
|
collector.trace_cards(data->tenured,
|
|
|
|
card_points_to_nursery,
|
|
|
|
simple_unmarker(card_points_to_nursery));
|
|
|
|
collector.trace_cards(data->aging,
|
|
|
|
card_points_to_nursery,
|
|
|
|
simple_unmarker(card_mark_mask));
|
2009-10-09 00:10:32 -04:00
|
|
|
collector.trace_code_heap_roots(&code->points_to_nursery);
|
2009-10-08 03:10:28 -04:00
|
|
|
collector.cheneys_algorithm();
|
2009-10-09 00:10:32 -04:00
|
|
|
update_dirty_code_blocks(&code->points_to_nursery);
|
2009-10-08 03:10:28 -04:00
|
|
|
|
|
|
|
nursery.here = nursery.start;
|
2009-10-09 00:10:32 -04:00
|
|
|
code->points_to_nursery.clear();
|
2009-10-07 16:48:09 -04:00
|
|
|
}
|
|
|
|
|
|
|
|
}
|