fixes to binding.

This commit is contained in:
Mark Thom
2016-10-30 21:49:27 -06:00
parent 1272d97311
commit d46197f1fd
3 changed files with 16 additions and 22 deletions

View File

@@ -147,6 +147,7 @@ pub fn compile_fact<'a>(t: &'a Term) -> Program {
if let &Term::Var(ref var) = t.as_ref() {
if !variable_allocs.contains_key(var) {
variable_allocs.insert(var, counter);
fact.push(MachineInstruction::UnifyVariable(counter));
counter += 1;
} else {