fix findall/4 (#873)

2021-03-18 12:50:12 -06:00
parent a3f0290432
commit 4623e9d7fc
2 changed files with 3 additions and 5 deletions
--- a/src/machine/system_calls.rs
+++ b/src/machine/system_calls.rs
@@ -467,7 +467,7 @@ impl MachineState {
        } else {
            self.p.local() + 1
        };
-        
+
        Ok(self.p = CodePtr::REPL(repl_code_ptr, p))
    }

@@ -3267,8 +3267,7 @@ impl MachineState {
                            let solutions = self[temp_v!(2)];
                            let diff = self[temp_v!(3)];

-                            (self.unify_fn)(self, solutions, Addr::EmptyList);
-                            (self.unify_fn)(self, diff, Addr::EmptyList);
+                            (self.unify_fn)(self, solutions, diff);
                        } else {
                            let h = self.heap.h();
                            let mut last_index = h;