fix cont function crashes (#2920)

This commit is contained in:
Mark Thom
2025-04-28 23:39:52 -07:00
committed by Mark Thom
parent 4e0493474e
commit d6b6eda77d
3 changed files with 11 additions and 28 deletions

View File

@@ -186,26 +186,8 @@ impl IndexMut<RegType> for MachineState {
pub type CallResult = Result<(), Vec<FunctorElement>>;
/*
#[inline(always)]
pub fn pstr_loc_and_offset(heap: &[HeapCellValue], index: usize) -> (usize, Fixnum) {
read_heap_cell!(heap[index],
(HeapCellValueTag::PStr | HeapCellValueTag::CStr) => {
(index, Fixnum::build_with(0))
}
(HeapCellValueTag::PStrOffset, h) => {
(h, cell_as_fixnum!(heap[index+1]))
}
_ => {
unreachable!()
}
)
}
*/
// size may be an upper bound.
// true_size is calculated to compute the exact offset.
fn push_var_eq_functors<'a>(
heap: &mut Heap,
size: usize,