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

we don't need to wakeup variables that have no attributes, even if they have been bound.

Browse Source
This commit is contained in:
Vitor Santos Costa
2010-03-15 14:17:30 +00:00
parent 117647f552
commit 8b6b9e9ac3
3 changed files with 15 additions and 14 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
C/globals.c
View File

@@ -527,6 +527,8 @@ copy_complex_term(register CELL *pt0, register CELL *pt0_end, int share, int cop
/* restore our nice, friendly, term to its original state */
HB = HB0;
clean_dirty_tr(TR0);
/* follow chain of multi-assigned variables */
close_attvar_chain(dvarsmin, dvarsmax);
return 0;
overflow:
@@ -545,6 +547,7 @@ copy_complex_term(register CELL *pt0, register CELL *pt0_end, int share, int cop
}
#endif
reset_trail(TR0);
reset_attvars(dvarsmin, dvarsmax);
return -1;
heap_overflow:
@@ -563,6 +566,7 @@ copy_complex_term(register CELL *pt0, register CELL *pt0_end, int share, int cop
}
#endif
reset_trail(TR0);
reset_attvars(dvarsmin, dvarsmax);
return -2;
trail_overflow:
@@ -581,6 +585,7 @@ copy_complex_term(register CELL *pt0, register CELL *pt0_end, int share, int cop
}
#endif
reset_trail(TR0);
reset_attvars(dvarsmin, dvarsmax);
return -4;
}