finalize transition to CutPolicy trait object.

2018-02-07 21:46:40 -07:00
parent 1bf9c0d205
commit 1b4d1c04c9
6 changed files with 62 additions and 35 deletions
--- a/src/prolog/machine/machine_state.rs
+++ b/src/prolog/machine/machine_state.rs
@@ -248,7 +248,7 @@ impl CutPolicy for SetupCallCleanupCutPolicy {
            machine_st.cp = machine_st.p;
            machine_st.num_of_args = 0;
            machine_st.b0 = machine_st.b;
-            machine_st.p  = CodePtr::DirEntry(352); // goto_call run_cleaners_without_handling/0.
+            machine_st.p  = CodePtr::DirEntry(354); // goto_call run_cleaners_without_handling/0, 354.
        }
    }
 }