vm/to_tenured_collector.hpp

   1 namespace factor
   2 {
   3
   4 struct to_tenured_policy {
   5         factor_vm *myvm;
   6         tenured_space *tenured;
   7
   8         explicit to_tenured_policy(factor_vm *myvm_) : myvm(myvm_), tenured(myvm->data->tenured) {}
   9
  10         bool should_copy_p(object *untagged)
  11         {
  12                 return !tenured->contains_p(untagged);
  13         }
  14
  15         void promoted_object(object *obj)
  16         {
  17                 tenured->mark_stack.push_back(obj);
  18         }
  19
  20         void visited_object(object *obj) {}
  21 };
  22
  23 struct to_tenured_collector : collector<tenured_space,to_tenured_policy> {
  24         explicit to_tenured_collector(factor_vm *myvm_);
  25         void tenure_reachable_objects();
  26 };
  27
  28 }