From: Mark <markjordanthom@gmail.com>
Date: Tue, 5 Sep 2023 20:56:26 +0000 (-0600)
Subject: check atom == ',' in ambiguity_check mirroring logic in print_op_addendum (#2000)
X-Git-Tag: remove~110
X-Git-Url: https://git.sagredo.dev/?a=commitdiff_plain;h=a0b5a24853a0490e71baff422e23233cc581b245;p=scryer-prolog.git

check atom == ',' in ambiguity_check mirroring logic in print_op_addendum (#2000)
---

diff --git a/src/heap_print.rs b/src/heap_print.rs
index 9880a4d1..1b69f866 100644
--- a/src/heap_print.rs
+++ b/src/heap_print.rs
@@ -580,7 +580,7 @@ impl<'a, Outputter: HCValueOutputter> HCPrinter<'a, Outputter> {
     fn ambiguity_check(&self, atom: &str) -> bool {
         let tail = &self.outputter.as_str()[self.last_item_idx..];
 
-        if !self.quoted || non_quoted_token(atom.chars()) {
+        if atom == "," || !self.quoted || non_quoted_token(atom.chars()) {
             requires_space(tail, atom)
         } else {
             requires_space(tail, "'")