Commit 0c6c8367 authored by John van Groningen's avatar John van Groningen
Browse files

in the heap size message on 32 bit intel print compacting for compacting...

in the heap size message on 32 bit intel print compacting for compacting collections (same as on 64 bit amd/intel)
parent 583ddd86
......@@ -252,6 +252,9 @@ garbage_collect_string_3:
heap_use_after_gc_string_1:
.ascii "Heap use after garbage collection: "
.byte 0
heap_use_after_compact_gc_string_1:
.ascii "Heap use after compacting garbage collection: "
.byte 0
heap_use_after_gc_string_2:
.ascii " Bytes."
.byte 10,0
......@@ -2334,6 +2337,8 @@ switch_to_mark_scan_2:
shl $2,d0
movb $1,garbage_collect_flag
lea heap_use_after_gc_string_1,a0
test a2,a2
jns end_garbage_collect
......@@ -2421,6 +2426,8 @@ no_small_heap1:
shl $2,d0
#endif
lea heap_use_after_gc_string_1,a0
end_garbage_collect:
#ifdef WRITE_HEAP
movl a4,heap_end_write_heap
......@@ -2435,7 +2442,7 @@ end_garbage_collect_:
pushl d0
push $heap_use_after_gc_string_1
push a0
call @ew_print_string
add $4,sp
......@@ -2851,6 +2858,8 @@ no_total_compact_gc_bytes_carry:
subl heap_p3,d0
movl n_allocated_words,d1
lea (d0,d1,4),d0
lea heap_use_after_compact_gc_string_1,a0
jmp end_garbage_collect
#ifdef _WINDOWS_
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment