diff options
| author | John van Groningen | 2011-11-15 15:28:06 +0000 |
|---|---|---|
| committer | John van Groningen | 2011-11-15 15:28:06 +0000 |
| commit | d29ae7c0746a91959df030c8550e82912367e21f (patch) | |
| tree | cc3bed145c0bd980470b95f1cd62b5d91aafbd73 /acompact_rmark.asm | |
| parent | fix compacting of reals (diff) | |
fix compacting for an empty A stack
Diffstat (limited to 'acompact_rmark.asm')
| -rw-r--r-- | acompact_rmark.asm | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/acompact_rmark.asm b/acompact_rmark.asm index b3b1221..0cf0f33 100644 --- a/acompact_rmark.asm +++ b/acompact_rmark.asm @@ -7,10 +7,11 @@ rmark_stack_nodes1: rmark_next_stack_node: add rsi,8 +rmark_stack_nodes: cmp rsi,qword ptr end_vector je end_rmark_nodes -rmark_stack_nodes: +rmark_more_stack_nodes: mov rcx,qword ptr [rsi] mov rax,qword ptr neg_heap_p3 @@ -35,7 +36,7 @@ rmark_stack_nodes: add rsi,8 cmp rsi,qword ptr end_vector - jne rmark_stack_nodes + jne rmark_more_stack_nodes ret rmark_stack_node: @@ -66,7 +67,7 @@ rmark_hnf_2: mov rcx,qword ptr [rcx] mov qword ptr 8[rsp],rbx - mov qword ptr [rsp],rax + mov qword ptr [rsp],rax cmp rsp,qword ptr end_stack jb rmark_using_reversal |