implement ListElisionPolicy to restore previous printer behavior

2023-09-30 16:00:15 -06:00
parent 25afc11168
commit 62c23166fa
9 changed files with 134 additions and 98 deletions
--- a/src/machine/machine_state.rs
+++ b/src/machine/machine_state.rs
@@ -588,7 +588,7 @@ impl MachineState {

        let mut singleton_var_set: IndexMap<Ref, bool> = IndexMap::new();

-        for cell in stackful_preorder_iter(&mut self.heap, &mut self.stack, heap_loc) {
+        for cell in stackful_preorder_iter::<NonListElider>(&mut self.heap, &mut self.stack, heap_loc) {
            let cell = unmark_cell_bits!(cell);

            if let Some(var) = cell.as_var() {