correct ',', backtrack bugs

2017-12-25 13:36:03 -07:00
parent 8fbe798362
commit a00d9ee5ae
5 changed files with 62 additions and 90 deletions
--- a/src/prolog/ast.rs
+++ b/src/prolog/ast.rs
@@ -724,8 +724,7 @@ pub enum BuiltInInstruction {
    IsVar(RegType),
    ResetBlock,
    SetBall,
-    SetNeckCutPoint(RegType),
-    SetNonNeckCutPoint(RegType),
+    SetCutPoint(RegType),
    Succeed,
    Unify,
    UnwindStack