fix broken quoting in writeq/1 (#1498)

diff --git a/src/heap_print.rs b/src/heap_print.rs
index 8316cd13f86e881142df3d68d766ca35fe222cc5..9a8d154c1e31122c77ab6b2ec9bc3e1e08d9bf30 100644 (file)
--- a/src/heap_print.rs
+++ b/src/heap_print.rs
@@ -1102,11 +1102,12 @@ impl<'a, Outputter: HCValueOutputter> HCPrinter<'a, Outputter> {
 
         let iter = HeapPStrIter::new(self.iter.heap, focus);
         let char_to_string = |c: char| {
-            // refrain from quoting characters other than '"' and '\'.
+            // refrain from quoting characters other than '"' and '\'
+            // unless self.quoted is true.
             match c {
                 '\\' => "\\\\".to_string(),
                 '"' => "\\\"".to_string(),
-                _ => char_to_string(false, c)
+                _ => char_to_string(self.quoted, c),
             }
         };