add compare predicate.

2018-02-21 23:21:18 -07:00
parent 5de03444eb
commit 9aac3cb086
10 changed files with 146 additions and 7 deletions
--- a/src/prolog/io.rs
+++ b/src/prolog/io.rs
@@ -129,6 +129,10 @@ impl fmt::Display for ControlInstruction {
                write!(f, "catch_execute"),
            &ControlInstruction::CheckCpExecute =>
                write!(f, "check_cp_execute"),
+            &ControlInstruction::CompareCall =>
+                write!(f, "compare_call"),
+            &ControlInstruction::CompareExecute =>
+                write!(f, "compare_execute"),
            &ControlInstruction::CompareTermCall(qt) =>
                write!(f, "compare_term_call {}", qt),
            &ControlInstruction::CompareTermExecute(qt) =>