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

fix anon vars in new syntax_error

Browse Source 
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@452 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
vsc
2002-04-23 22:43:10 +00:00
parent 13a8ebfe34
commit 778dbbde3e
5 changed files with 13 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
C/utilpreds.c
View File

@@ -108,7 +108,7 @@ copy_complex_term(register CELL *pt0, register CELL *pt0_end, CELL *ptf, CELL *H
pt0_end = ap2 + 1;
ptf = H;
H += 2;
if (H > ENV - 2048) {
if (H > ASP - 2048) {
goto overflow;
}
} else if (IsApplTerm(d0)) {
@@ -161,7 +161,7 @@ copy_complex_term(register CELL *pt0, register CELL *pt0_end, CELL *ptf, CELL *H
H[0] = (CELL)f;
ptf = H+1;
H += 1+d0;
if (H > ENV - 2048) {
if (H > ASP - 2048) {
goto overflow;
}
} else {