trail check on C entry: make sure we don't have unhandled trail overflows.
This commit is contained in:
parent
772d091a70
commit
026a666055
@ -7339,7 +7339,7 @@ Yap_absmi(int inp)
|
||||
\************************************************************************/
|
||||
|
||||
BOp(call_cpred, Osbpp);
|
||||
|
||||
check_trail(TR);
|
||||
if (!(PREG->u.Osbpp.p->PredFlags & (SafePredFlag|HiddenPredFlag))) {
|
||||
CACHE_Y_AS_ENV(YREG);
|
||||
check_stack(NoStackCall, H);
|
||||
@ -7387,6 +7387,7 @@ Yap_absmi(int inp)
|
||||
|
||||
/* execute Label */
|
||||
BOp(execute_cpred, pp);
|
||||
check_trail(TR);
|
||||
{
|
||||
PredEntry *pt0;
|
||||
|
||||
|
Reference in New Issue
Block a user