From 81743361a61a810af465afa32c5cd4d21edf2852 Mon Sep 17 00:00:00 2001
From: Vitor Santos Costa <vsc@dcc.fc.up.pt>
Date: Thu, 23 Aug 2012 09:03:42 -0500
Subject: [PATCH] fix warning

---
 C/absmi.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/C/absmi.c b/C/absmi.c
index 51fa59280..3e551abc2 100755
--- a/C/absmi.c
+++ b/C/absmi.c
@@ -12942,7 +12942,7 @@ Yap_absmi(int inp)
 	  f = pen->FunctorOfPred;
 	  /* reuse environment if we are continuining a comma, ie, (g1,g2,g3) */
 	  /* can only do it deterministically */
-	  if (f == FunctorComma && B >= ENV) {
+	  if (f == FunctorComma && (CELL *)B >= ENV) {
 	    ENV_YREG = ENV;
 	    ENV = (CELL *)ENV[E_E];
 	  }