preliminary read support

2018-07-25 17:12:07 -06:00
parent 82ff377585
commit 38dcd6113e
11 changed files with 167 additions and 23 deletions
--- a/src/prolog/machine/machine_state_impl.rs
+++ b/src/prolog/machine/machine_state_impl.rs
@@ -1825,7 +1825,7 @@ impl MachineState {
            },
            &ControlInstruction::CallClause(ClauseType::BuiltIn(ref ct), _, _, lco) => {
                self.last_call = lco;
-                try_or_fail!(self, call_policy.call_builtin(self, ct));
+                try_or_fail!(self, call_policy.call_builtin(self, ct, code_dirs));
            },
            &ControlInstruction::CallClause(ClauseType::Inlined(ref ct), ..) =>
                self.execute_inlined(ct),