fix bad test for space overflow
This commit is contained in:
parent
8e30d82119
commit
8e55611d90
@ -2570,10 +2570,12 @@ YAP_OpenList(int n)
|
||||
Term t;
|
||||
BACKUP_H();
|
||||
|
||||
if (H+2*n < ASP-1024) {
|
||||
if (!dogc())
|
||||
if (H+2*n > ASP-1024) {
|
||||
if (!dogc()) {
|
||||
RECOVER_H();
|
||||
return FALSE;
|
||||
}
|
||||
}
|
||||
t = AbsPair(H);
|
||||
H += 2*n;
|
||||
|
||||
|
Reference in New Issue
Block a user