fix warning

This commit is contained in:
Vitor Santos Costa 2012-08-23 09:03:42 -05:00
parent e2fb330575
commit 81743361a6
1 changed files with 1 additions and 1 deletions

View File

@ -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];
}