fix write_canonical on strings (#1233)

diff --git a/src/heap_print.rs b/src/heap_print.rs
index 8852c3c83041d534560867ca08ac93ea86bf65e8..0a664c6a49ccb62833cae398e3f72400e48de840 100644 (file)
--- a/src/heap_print.rs
+++ b/src/heap_print.rs
@@ -1148,10 +1148,6 @@ impl<'a, Outputter: HCValueOutputter> HCPrinter<'a, Outputter> {
                 if end_cell == empty_list_as_cell!() {
                     append_str!(self, "[]");
                 } else {
-                    if self.outputter.ends_with(",") {
-                        self.outputter.truncate(self.outputter.len() - ','.len_utf8());
-                    }
-
                     self.state_stack.push(TokenOrRedirect::FunctorRedirect(max_depth));
                     self.iter.push_stack(end_h);
                 }