diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fix case where OldHeapUsed is 0 (mallinfo not available).

Browse Source 
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1637 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
vsc 2006-05-18 16:55:19 +00:00
parent 326583c727
commit f9987d9fe9
1 changed files with 7 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
C/heapgc.c
View File

@ -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*100/(hp_erased+hp_in_use_erased)),
(long int)(hp_erased+hp_in_use_erased)); (long int)(hp_erased+hp_in_use_erased));
#endif #endif
fprintf(Yap_stderr, if (OldHeapUsed) {
"%% Heap: recovered %ld bytes (%ld%%) out of %ld\n", fprintf(Yap_stderr,
(unsigned long int)(OldHeapUsed-HeapUsed), "%% Heap: recovered %ld bytes (%ld%%) out of %ld\n",
(unsigned long int)((OldHeapUsed-HeapUsed)/(OldHeapUsed/100)), (unsigned long int)(OldHeapUsed-HeapUsed),
(unsigned long int)OldHeapUsed); (unsigned long int)((OldHeapUsed-HeapUsed)/(OldHeapUsed/100)),
(unsigned long int)OldHeapUsed);
}
} }
CleanDeadClauses(); CleanDeadClauses();
} }