correct bug in bb_b_put, correct stack truncation bug resulting in erroneous failures (affecting issue #255 and the in-progress tabling library)

2020-01-19 20:56:11 -07:00
parent 9958ad6f34
commit 6be2d8ccf2
5 changed files with 9 additions and 12 deletions
--- a/src/prolog/machine/machine_state_impl.rs
+++ b/src/prolog/machine/machine_state_impl.rs
@@ -2074,7 +2074,6 @@ impl MachineState {

    pub(super) fn unwind_stack(&mut self) {
        self.b = self.block;
-        self.truncate_stack();
        self.fail = true;
    }

@@ -3329,7 +3328,6 @@ impl MachineState {
                    self.b = b0;
                    self.tidy_trail();
                    self.tidy_pstr_trail();
-                    self.truncate_stack();
                }

                self.p += 1;