webapps.wiki: adding search bar

[factor.git] / vm / gc.hpp

diff --git a/vm/gc.hpp b/vm/gc.hpp
old mode 100755 (executable)
new mode 100644 (file)
index 9469603..b28038e
--- a/vm/gc.hpp
+++ b/vm/gc.hpp
@@ -1,42 +1,55 @@
-namespace factor
-{
+namespace factor {
+
+struct must_start_gc_again {
+};
 
 enum gc_op {
-       collect_nursery_op,
-       collect_aging_op,
-       collect_to_tenured_op,
-       collect_full_op,
-       collect_growing_heap_op
+  COLLECT_NURSERY_OP,
+  COLLECT_AGING_OP,
+  COLLECT_TO_TENURED_OP,
+  COLLECT_FULL_OP,
+  COLLECT_COMPACT_OP,
+  COLLECT_GROWING_DATA_HEAP_OP
 };
 
-/* statistics */
-struct generation_statistics {
-       cell collections;
-       u64 gc_time;
-       u64 max_gc_time;
-       cell object_count;
-       u64 bytes_copied;
+// These are the phases of the gc cycles we record the times of.
+enum gc_phase {
+  PHASE_CARD_SCAN,
+  PHASE_CODE_SCAN,
+  PHASE_DATA_SWEEP,
+  PHASE_CODE_SWEEP,
+  PHASE_DATA_COMPACTION,
+  PHASE_MARKING
 };
 
-struct gc_statistics {
-       generation_statistics nursery_stats;
-       generation_statistics aging_stats;
-       generation_statistics full_stats;
-       u64 cards_scanned;
-       u64 decks_scanned;
-       u64 card_scan_time;
-       u64 code_blocks_scanned;
+struct gc_event {
+  gc_op op;
+  data_heap_room data_heap_before;
+  allocator_room code_heap_before;
+  data_heap_room data_heap_after;
+  allocator_room code_heap_after;
+  cell cards_scanned;
+  cell decks_scanned;
+  cell code_blocks_scanned;
+  uint64_t start_time;
+  cell total_time;
+  cell times[6];
+  uint64_t temp_time;
+
+  gc_event(gc_op op, factor_vm* parent);
+  void reset_timer();
+  void ended_phase(gc_phase phase);
+  void ended_gc(factor_vm* parent);
 };
 
 struct gc_state {
-       gc_op op;
-       u64 start_time;
-        jmp_buf gc_unwind;
+  gc_op op;
+  uint64_t start_time;
+  gc_event* event;
 
-       explicit gc_state(gc_op op_);
-       ~gc_state();
+  gc_state(gc_op op, factor_vm* parent);
+  ~gc_state();
+  void start_again(gc_op op_, factor_vm* parent);
 };
 
-VM_C_API void inline_gc(cell *gc_roots_base, cell gc_roots_size, factor_vm *myvm);
-
 }