From f9987d9fe9905928b9f6f5e8bfd6192d46b9e81f Mon Sep 17 00:00:00 2001 From: vsc Date: Thu, 18 May 2006 16:55:19 +0000 Subject: [PATCH] fix case where OldHeapUsed is 0 (mallinfo not available). git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1637 b08c6af1-5177-4d33-ba66-4b1c6b8b522a --- C/heapgc.c | 12 +++++++----- 1 file changed, 7 insertions(+), 5 deletions(-) diff --git a/C/heapgc.c b/C/heapgc.c index 4bdf82a2c..9723017b1 100644 --- a/C/heapgc.c +++ b/C/heapgc.c @@ -2454,11 +2454,13 @@ sweep_trail(choiceptr gc_B, tr_fr_ptr old_TR) (long int)(hp_erased*100/(hp_erased+hp_in_use_erased)), (long int)(hp_erased+hp_in_use_erased)); #endif - fprintf(Yap_stderr, - "%% Heap: recovered %ld bytes (%ld%%) out of %ld\n", - (unsigned long int)(OldHeapUsed-HeapUsed), - (unsigned long int)((OldHeapUsed-HeapUsed)/(OldHeapUsed/100)), - (unsigned long int)OldHeapUsed); + if (OldHeapUsed) { + fprintf(Yap_stderr, + "%% Heap: recovered %ld bytes (%ld%%) out of %ld\n", + (unsigned long int)(OldHeapUsed-HeapUsed), + (unsigned long int)((OldHeapUsed-HeapUsed)/(OldHeapUsed/100)), + (unsigned long int)OldHeapUsed); + } } CleanDeadClauses(); }