vm: actually collect samples and add primitives...

db4
Joe Groff 2011-10-30 23:42:36 -07:00
parent 5b6fb25ffd
commit 27d7e4af53
2 changed files with 3 additions and 0 deletions

View File

@ -177,6 +177,7 @@ void factor_vm::enqueue_safepoint_sample()
FACTOR_ATOMIC_ADD(&safepoint_sample_count, 1); FACTOR_ATOMIC_ADD(&safepoint_sample_count, 1);
if (current_gc) if (current_gc)
FACTOR_ATOMIC_ADD(&safepoint_gc_sample_count, 1); FACTOR_ATOMIC_ADD(&safepoint_gc_sample_count, 1);
code->guard_safepoint();
} }
} }

View File

@ -37,6 +37,7 @@ namespace factor
_(callstack_for) \ _(callstack_for) \
_(callstack_to_array) \ _(callstack_to_array) \
_(check_datastack) \ _(check_datastack) \
_(clear_samples) \
_(clone) \ _(clone) \
_(code_blocks) \ _(code_blocks) \
_(code_room) \ _(code_room) \
@ -90,6 +91,7 @@ namespace factor
_(ftell) \ _(ftell) \
_(full_gc) \ _(full_gc) \
_(fwrite) \ _(fwrite) \
_(get_samples) \
_(identity_hashcode) \ _(identity_hashcode) \
_(innermost_stack_frame_executing) \ _(innermost_stack_frame_executing) \
_(innermost_stack_frame_scan) \ _(innermost_stack_frame_scan) \