handle TCO when setting up verify_attributes interrupts

2019-10-13 14:13:52 -06:00
parent 249b613e36
commit da89b1af63
3 changed files with 8 additions and 3 deletions
--- a/src/prolog/machine/mod.rs
+++ b/src/prolog/machine/mod.rs
@@ -1046,7 +1046,7 @@ impl MachineState {

            match self.p {
                CodePtr::VerifyAttrInterrupt(_) => {
-                    self.p = CodePtr::Local(self.attr_var_init.cp);// + 1);
+                    self.p = CodePtr::Local(self.attr_var_init.cp);

                    if !self.verify_attr_stepper(indices, policies, code_repo, prolog_stream) {
                        if self.fail {