fix duplicate_term bug

2018-01-14 23:05:15 -07:00
parent 08b94dcdf5
commit a4022d569f
10 changed files with 60 additions and 32 deletions
--- a/src/prolog/codegen.rs
+++ b/src/prolog/codegen.rs
@@ -249,6 +249,8 @@ impl<'a, TermMarker: Allocator<'a>> CodeGenerator<'a, TermMarker>
                code.push(Line::Control(ControlInstruction::CatchCall)),
            &QueryTerm::Display(_) =>
                code.push(Line::Control(ControlInstruction::DisplayCall)),
+            &QueryTerm::DuplicateTerm(_) =>
+                code.push(Line::Control(ControlInstruction::DuplicateTermCall)),
            &QueryTerm::Functor(_) =>
                code.push(Line::Control(ControlInstruction::FunctorCall)),            
            &QueryTerm::Inlined(_) =>
@@ -285,6 +287,8 @@ impl<'a, TermMarker: Allocator<'a>> CodeGenerator<'a, TermMarker>
                        *ctrl = ControlInstruction::ExecuteN(arity),
                    ControlInstruction::DisplayCall =>
                        *ctrl = ControlInstruction::DisplayExecute,
+                    ControlInstruction::DuplicateTermCall =>
+                        *ctrl = ControlInstruction::DuplicateTermExecute,
                    ControlInstruction::FunctorCall =>
                        *ctrl = ControlInstruction::FunctorExecute,
                    ControlInstruction::CatchCall =>