fix bad pruning in meta-call

2013-11-16 23:08:17 +00:00
parent 3aa994313b
commit 5dbaeedf08
9 changed files with 11 additions and 11 deletions
--- a/C/absmi.c
+++ b/C/absmi.c
@@ -13512,7 +13512,7 @@ Yap_absmi(int inp)
 #endif	/* LOW_LEVEL_TRACER */
 	WRITEBACK_Y_AS_ENV();
 	/* setup GB */
-	ENV_YREG[E_CB] = (CELL) b_ptr;
+	ENV_YREG[E_CB] = (CELL) B;
 #ifdef YAPOR
 	SCH_check_requests();
 #endif	/* YAPOR */