From a99412c48f196c1620f90511afc03cc15a36672c Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?V=C3=ADtor=20Santos=20Costa?= Date: Mon, 16 Jul 2012 10:20:56 -0500 Subject: [PATCH] fix gall to gc. --- C/absmi.c | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/C/absmi.c b/C/absmi.c index 113cf0f06..139bad676 100755 --- a/C/absmi.c +++ b/C/absmi.c @@ -13085,7 +13085,7 @@ Yap_absmi(int inp) goto fail; } PP = PredMetaCall; - SREG = (CELL *) pen; + SREG = (CELL *) PP; ASP = ENV_YREG; if (ASP > (CELL *)PROTECT_FROZEN_B(B)) ASP = (CELL *)PROTECT_FROZEN_B(B); @@ -13096,7 +13096,7 @@ Yap_absmi(int inp) goto creep_pe; } saveregs_and_ycache(); - if (!Yap_gc(((PredEntry *)SREG)->ArityOfPE, ENV, NEXTOP(PREG, Osbpp))) { + if (!Yap_gc(PP->ArityOfPE, ENV, NEXTOP(PREG, Osbpp))) { Yap_NilError(OUT_OF_STACK_ERROR,LOCAL_ErrorMessage); } setregs_and_ycache(); @@ -13294,7 +13294,7 @@ Yap_absmi(int inp) goto fail; } PP = PredMetaCall; - SREG = (CELL *) pen; + SREG = (CELL *) PP; ASP = ENV_YREG; if (ASP > (CELL *)PROTECT_FROZEN_B(B)) ASP = (CELL *)PROTECT_FROZEN_B(B); @@ -13305,7 +13305,7 @@ Yap_absmi(int inp) goto creep_pe; } saveregs_and_ycache(); - if (!Yap_gc(((PredEntry *)SREG)->ArityOfPE, ENV, NEXTOP(PREG, Osbmp))) { + if (!Yap_gc(PP->ArityOfPE, ENV, NEXTOP(PREG, Osbmp))) { Yap_NilError(OUT_OF_STACK_ERROR,LOCAL_ErrorMessage); } setregs_and_ycache();