From a1d44f068e8907ca2b20f063d1c98fdc3bb154a1 Mon Sep 17 00:00:00 2001
From: Costa Vitor <vitor@quasar-20.(none)>
Date: Sat, 12 Sep 2009 16:45:00 -0500
Subject: [PATCH] fix stupid typo.

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

diff --git a/C/grow.c b/C/grow.c
index 846f03f81..e51fbfbcf 100644
--- a/C/grow.c
+++ b/C/grow.c
@@ -820,7 +820,7 @@ static_growglobal(long request, CELL **ptr, CELL *hsplit)
       LDiff = TrDiff = size;
     } else {
       /* we may still have an overflow */
-      BaseDiff = Yap_GlobalBase != old_GlobalBase;
+      BaseDiff = Yap_GlobalBase - old_GlobalBase;
       /* if we grow, we need to move the stacks */
       LDiff = TrDiff = BaseDiff+size;
     }