- Fixed a bug in subst reporting, when substitutions are compund terms.
This commit is contained in:
parent
911e9e4e94
commit
b6598ea8f4
11
src/mgu.c
11
src/mgu.c
@ -54,8 +54,15 @@ termMguTerm (Term t1, Term t2)
|
|||||||
termPrint (t);
|
termPrint (t);
|
||||||
printf (", typed ");
|
printf (", typed ");
|
||||||
termlistPrint (t->stype);
|
termlistPrint (t->stype);
|
||||||
printf ("->");
|
if (realTermLeaf (t->subst))
|
||||||
termlistPrint (t->subst->stype);
|
{
|
||||||
|
printf ("->");
|
||||||
|
termlistPrint (t->subst->stype);
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
printf (", composite term");
|
||||||
|
}
|
||||||
printf ("\n");
|
printf ("\n");
|
||||||
}
|
}
|
||||||
#endif
|
#endif
|
||||||
|
Loading…
Reference in New Issue
Block a user