look up operator precedence when arity does not match what the atom records, don't print brackets around outermost '+' (#629)

2020-07-17 11:02:58 -06:00
parent 6c691d9223
commit f0c8056334
5 changed files with 59 additions and 23 deletions
--- a/src/heap_print.rs
+++ b/src/heap_print.rs
@@ -1408,7 +1408,7 @@ impl<'a, Outputter: HCValueOutputter> HCPrinter<'a, Outputter> {

        match self.machine_st.heap.index_addr(&addr).as_ref() {
            &HeapCellValue::NamedStr(arity, ref name, ref spec) => {
-                let spec = fetch_op_spec(name.clone(), arity, spec.clone(), self.op_dir);
+                let spec = fetch_op_spec_from_existing(name.clone(), arity, spec.clone(), self.op_dir);

                if let Some(spec) = spec {
                    self.handle_op_as_struct(