rishi/scryer-prolog
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix functor! size calculations around indexing_code_ptr

Browse Source
This commit is contained in:
Mark Thom
2025-04-23 22:49:03 -07:00
committed by Mark Thom
parent 258244caf2
commit 706ffe7ad9
4 changed files with 20 additions and 21 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
src/machine/system_calls.rs
View File

@@ -7307,20 +7307,19 @@ impl Machine {
walk_code(&self.code, index_ptr, |instr| {
let old_len = functors.len();
instr.enqueue_functors(&mut self.machine_st.arena, &mut functors);
let new_len = functors.len();
for index in old_len..new_len {
let functor_len = functors[index].len();
for functor in &functors[old_len..] {
let functor_len = functor.len();
match functor_len {
0 => {}
1 => {
functor_list.push(heap_loc_as_cell!(h));
h += cell_index!(Heap::compute_functor_byte_size(&functors[index]));
h += cell_index!(Heap::compute_functor_byte_size(functor));
}
_ => {
functor_list.push(str_loc_as_cell!(h));
h += cell_index!(Heap::compute_functor_byte_size(&functors[index]));
h += cell_index!(Heap::compute_functor_byte_size(functor));
}
};
}