track the parent operator of the current operator in heap_print to emit space if necessary (#1906)

2023-07-24 20:05:28 -06:00
parent 762e6d3ba4
commit 287c308bc3
2 changed files with 84 additions and 61 deletions
--- a/tests-pl/iso-conformity-tests.pl
+++ b/tests-pl/iso-conformity-tests.pl
@@ -998,6 +998,9 @@ test_310 :- test_syntax_error("writeq({\\+ (}).", syntax_error(incomplete_reduct

 test_311 :- test_syntax_error("Finis ().", syntax_error(incomplete_reduction)).

+test_318 :- writeq_term_to_chars(+((1*2)^3), C),
+            C == "+ (1*2)^3".
+
 run_tests([Test|Tests]) -->
    (  { call(Test) } ->
       []