]> gitweb.factorcode.org Git - factor.git/blob - vm/full_collector.hpp
Merge branch 'master' of git://factorcode.org/git/factor
[factor.git] / vm / full_collector.hpp
1 namespace factor
2 {
3
4 struct full_policy {
5         factor_vm *myvm;
6         zone *tenured;
7
8         full_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
16 struct full_collector : copying_collector<tenured_space,full_policy> {
17         bool trace_contexts_p;
18
19         full_collector(factor_vm *myvm_);
20         void mark_active_blocks();
21         void mark_object_code_block(object *object);
22         void trace_callbacks();
23         void trace_literal_references(code_block *compiled);
24         void mark_code_block(code_block *compiled);
25         void cheneys_algorithm();
26 };
27
28 }