diogo
/
yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fix error messages

This commit is contained in:
Vitor Santos Costa 2010-03-14 09:32:04 +00:00
parent d33be13487
commit 4fafe10fbe
1 changed files with 0 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
C/utilpreds.c
View File

@ -309,13 +309,10 @@ copy_complex_term(CELL *pt0, CELL *pt0_end, int share, int newattvs, CELL *ptf,
clean_dirty_tr(TR0);
/* follow chain of multi-assigned variables */
if (dvarsmin) {
fprintf(stderr,"%ld--%ld\n", dvarsmin-H0,dvarsmax-H0);
dvarsmin += 1;
do {
CELL *newv;
fprintf(stderr,"mabind %ld %p %p\n", dvarsmin-H0, TR, dvarsmin+1);
Bind(dvarsmin+1, dvarsmin[1]);
fprintf(stderr,"redone %p\n", TR);
if (IsUnboundVar(dvarsmin))
break;
newv = CellPtr(*dvarsmin);