rational trees.

2018-08-15 01:29:20 +01:00
parent f329a715dd
commit 208ed54b45
14 changed files with 488 additions and 316 deletions
--- a/os/writeterm.c
+++ b/os/writeterm.c
@@ -232,7 +232,7 @@ static bool write_term(int output_stream, Term t, xarg *args USES_REGS) {
    }
  }
  if (args[WRITE_CYCLES].used && args[WRITE_CYCLES].tvalue == TermFalse) {
-    flags |= Unfold_cyclics_f;
+    flags |= Ignore_cyclics_f;
  }
  if (args[WRITE_QUOTED].used && args[WRITE_QUOTED].tvalue == TermTrue) {
    flags |= Quote_illegal_f;