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/macros.rs
+++ b/src/prolog/macros.rs
@@ -309,15 +309,9 @@ macro_rules! unify_variable {
    )
 }

-macro_rules! set_neck_cut {
+macro_rules! set_cp {
    ($r:expr) => (
-        Line::BuiltIn(BuiltInInstruction::SetNeckCutPoint($r))
-    )
-}
-
-macro_rules! set_non_neck_cut {
-    ($r:expr) => (
-        Line::BuiltIn(BuiltInInstruction::SetNonNeckCutPoint($r))
+        Line::BuiltIn(BuiltInInstruction::SetCutPoint($r))
    )
 }