should always be ENV
This commit is contained in:
parent
780b629bff
commit
a077500795
@ -712,7 +712,7 @@ p_functor(void) /* functor(?,?,?) */
|
||||
*pt1++ = d0;
|
||||
d0 = AbsAppl(H);
|
||||
if (pt1+d1 > ENV - CreepFlag) {
|
||||
if (!Yap_gcl((1+d1)*sizeof(CELL), 3, YENV, gc_P(P,CP))) {
|
||||
if (!Yap_gcl((1+d1)*sizeof(CELL), 3, ENV, gc_P(P,CP))) {
|
||||
Yap_Error(OUT_OF_STACK_ERROR, TermNil, Yap_ErrorMessage);
|
||||
return FALSE;
|
||||
}
|
||||
|
Reference in New Issue
Block a user