mark structures with their fixity

2018-01-14 21:48:10 -07:00
parent b2b4ce6877
commit 58ba368280
16 changed files with 131 additions and 118 deletions
--- a/src/prolog/heap_iter.rs
+++ b/src/prolog/heap_iter.rs
@@ -34,7 +34,7 @@ impl<'a> HeapCellIterator<'a> {
    fn follow_heap(&mut self, h: usize) -> Addr
    {
        match &self.machine_st.heap[h] {
-            &HeapCellValue::NamedStr(arity, _) => {
+            &HeapCellValue::NamedStr(arity, _, _) => {
                for idx in (1 .. arity + 1).rev() {
                    self.state_stack.push(Ref::HeapCell(h + idx));
                }