add support for printing cyclic terms.

2018-05-05 01:53:05 -06:00
parent c369ce9a7f
commit d6495c8195
9 changed files with 279 additions and 149 deletions
--- a/src/prolog/machine/machine_errors.rs
+++ b/src/prolog/machine/machine_errors.rs
@@ -135,8 +135,8 @@ impl MachineState {
    pub(super) fn throw_exception(&mut self, err: MachineError) {
        let h = self.heap.h;

-        self.ball.0 = 0;
-        self.ball.1.truncate(0);
+        self.ball.boundary = 0;
+        self.ball.stub.truncate(0);

        self.heap.append(err);