unmark cells in arith_eval_by_metacall (#1497)

2022-06-01 00:02:11 -06:00
parent 4b5c22864e
commit c36d4a9c9a
1 changed files with 2 additions and 0 deletions
--- a/src/machine/arithmetic_ops.rs
+++ b/src/machine/arithmetic_ops.rs
@@ -1128,6 +1128,8 @@ impl MachineState {
                return Err(self.error_form(evaluable_error, stub_gen()));
            }

+            let value = unmark_cell_bits!(value);
+
            read_heap_cell!(value,
                (HeapCellValueTag::Atom, (name, arity)) => {
                    if arity == 2 {