correct off by 1 error in verify_attrs_interrupt, revert to previous lists.pl

2019-10-12 19:14:33 -06:00
parent 8c4c70b089
commit 1d41489381
6 changed files with 50 additions and 52 deletions
--- a/src/prolog/machine/system_calls.rs
+++ b/src/prolog/machine/system_calls.rs
@@ -1617,10 +1617,10 @@ impl MachineState {
                if let &Addr::Con(Constant::Usize(num_of_args)) = &self.and_stack[e][frame_len] {
                    self.num_of_args = num_of_args;
                }
-
-                self.p = CodePtr::Local(self.and_stack[e].interrupt_cp);
+                
                self.deallocate();
-
+                self.p = CodePtr::Local(self.and_stack[e].interrupt_cp);
+                
                return Ok(());
            }
            &SystemClauseType::RestoreCutPolicy => {