correct answer substitution order, equating variables to themselves (#326)

2020-04-29 01:45:42 -06:00
parent 0e1226573a
commit 7e765fe726
4 changed files with 360 additions and 458 deletions
--- a/src/prolog/machine/machine_state.rs
+++ b/src/prolog/machine/machine_state.rs
@@ -631,7 +631,7 @@ impl MachineState {

                let mut list_of_var_eqs = vec![];

-                for (var, binding) in term_write_result.var_dict.into_iter().rev() {
+                for (var, binding) in term_write_result.var_dict.into_iter() {
                    let var_atom = clause_name!(var.to_string(), indices.atom_tbl);

                    let h = self.heap.h();