diff --git a/src/mgu.c b/src/mgu.c index 07bac40..6a269be 100644 --- a/src/mgu.c +++ b/src/mgu.c @@ -156,7 +156,7 @@ unify (Term t1, Term t2, Termlist tl, int (*callback) (), void *state) t2 = deVar (t2); if (t1 == t2) { - return callback (tl); + return callback (tl, state); } if (!(hasTermVariable (t1) || hasTermVariable (t2)))