From 4c268f2600ac702f633e29ae3c349d36b023bfd7 Mon Sep 17 00:00:00 2001 From: Slava Pestov Date: Fri, 13 Nov 2009 09:29:21 -0600 Subject: [PATCH] vm: record compaction events correctly --- vm/full_collector.cpp | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/vm/full_collector.cpp b/vm/full_collector.cpp index 4edb23cf73..188ab55efc 100644 --- a/vm/full_collector.cpp +++ b/vm/full_collector.cpp @@ -127,7 +127,11 @@ void factor_vm::collect_full(bool trace_contexts_p) collect_mark_impl(trace_contexts_p); collect_sweep_impl(); if(data->low_memory_p()) + { + current_gc->op = collect_compact_op; + current_gc->event->op = collect_compact_op; collect_compact_impl(trace_contexts_p); + } else update_code_heap_words_and_literals(); }