vm/nursery_collector.cpp

   1 #include "master.hpp"
   2
   3 namespace factor {
   4
   5 struct nursery_policy {
   6   bump_allocator* nursery;
   7
   8   explicit nursery_policy(bump_allocator* nursery) : nursery(nursery) {}
   9
  10   bool should_copy_p(object* obj) {
  11     return nursery->contains_p(obj);
  12   }
  13
  14   void promoted_object(object* obj) {}
  15
  16   void visited_object(object* obj) {}
  17 };
  18
  19 void factor_vm::collect_nursery() {
  20
  21   /* Copy live objects from the nursery (as determined by the root set and
  22      marked cards in aging and tenured) to aging space. */
  23   nursery_policy policy(this->data->nursery);
  24   collector<aging_space, nursery_policy>
  25       collector(this, this->data->aging, policy);
  26
  27   collector.visitor.visit_all_roots();
  28   gc_event* event = current_gc->event;
  29
  30   if (event)
  31     event->started_card_scan();
  32   collector.trace_cards(data->tenured, card_points_to_nursery,
  33                         card_points_to_nursery);
  34   collector.trace_cards(data->aging, card_points_to_nursery, 0xff);
  35
  36   if (event)
  37     event->ended_card_scan(collector.cards_scanned, collector.decks_scanned);
  38
  39   if (event)
  40     event->started_code_scan();
  41   collector.trace_code_heap_roots(&code->points_to_nursery);
  42   if (event)
  43     event->ended_code_scan(collector.code_blocks_scanned);
  44
  45   collector.cheneys_algorithm();
  46
  47   data->reset_nursery();
  48   code->points_to_nursery.clear();
  49 }
  50
  51 }