Verified Commit 6907a883 authored by Camil Staps's avatar Camil Staps 🙂

Fix calculation of heap_free in jsr_eval_host_node and jsr_eval_host_node_with_args

parent 70f6fe7c
......@@ -43,7 +43,7 @@ INSTRUCTION_BLOCK(jsr_eval_host_node):
n[1]=new_n[1];
n[2]=new_n[2];
hp=ie->hp+words_used;
heap_free = heap + (ie->options.in_first_semispace ? 1 : 2) * heap_size - hp;
heap_free=ie->hp_end-hp;
pc=(BC_WORD*)*csp--;
END_INSTRUCTION_BLOCK;
......@@ -246,7 +246,7 @@ jsr_eval_host_node_with_args:
goto eval_to_hnf_return_failure;
}
hp=ie->hp+words_used;
heap_free = heap + (ie->options.in_first_semispace ? 1 : 2) * heap_size - hp;
heap_free=ie->hp_end-hp;
pc=(BC_WORD*)*csp--;
END_INSTRUCTION_BLOCK;
......
Markdown is supported
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