correct keysort type error (re: #34)

2018-05-03 11:52:33 -06:00
parent df1421dae8
commit 76bae21ff6
2 changed files with 23 additions and 19 deletions
--- a/src/prolog/machine/machine_state_impl.rs
+++ b/src/prolog/machine/machine_state_impl.rs
@@ -1742,7 +1742,7 @@ impl MachineState {
                    _ => Err(self.error_form(self.type_error(ValidType::Pair,
                                                             self.heap[s].as_addr(s))))
                },
-            a => Err(self.error_form(self.type_error(ValidType::Callable, a)))
+            a => Err(self.error_form(self.type_error(ValidType::Pair, a)))
        }
    }