From a31c94e31a3b45608120ec80751ad9f005cdcc8a Mon Sep 17 00:00:00 2001
From: vsc <vsc@b08c6af1-5177-4d33-ba66-4b1c6b8b522a>
Date: Fri, 14 Feb 2003 12:12:06 +0000
Subject: [PATCH] guess what: more int=\= long changes!

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@781 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
---
 C/heapgc.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/C/heapgc.c b/C/heapgc.c
index 205535757..2e6d793d3 100644
--- a/C/heapgc.c
+++ b/C/heapgc.c
@@ -2962,7 +2962,7 @@ compaction_phase(tr_fr_ptr old_TR, CELL *current_env, yamop *curp, CELL *max)
 #ifdef HYBRID_SCHEME
 #ifdef DEBUG
   if (total_marked != iptop-(CELL_PTR *)H && iptop < (CELL_PTR *)ASP -1024)
-    fprintf(Yap_stderr,"[GC] Oops on iptop-H (%d) vs %d\n", iptop-(CELL_PTR *)H, total_marked);
+    fprintf(Yap_stderr,"[GC] Oops on iptop-H (%ld) vs %ld\n", iptop-(CELL_PTR *)H, total_marked);
 #endif
   if (iptop < (CELL_PTR *)ASP && 10*total_marked < H-H0) {
 #ifdef INSTRUMENT_GC