fix unification bug.

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@569 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
vsc
2002-08-13 16:51:37 +00:00
parent 00033ba7af
commit 742299360c
3 changed files with 11 additions and 4 deletions

View File

@@ -493,7 +493,7 @@ loop:
to_visit[0] = pt0;
to_visit[1] = pt0_end;
to_visit[2] = pt1;
to_visit[3] = (CELL *)d0;
to_visit[3] = *pt0;
*pt0 = d1;
#else
/* store the terms to visit */
@@ -535,7 +535,7 @@ loop:
to_visit[0] = pt0;
to_visit[1] = pt0_end;
to_visit[2] = pt1;
to_visit[3] = (CELL *)d0;
to_visit[3] = *pt0;
*pt0 = d1;
#else
/* store the terms to visit */