diff options
author | Simon Marlow <marlowsd@gmail.com> | 2008-06-17 10:11:02 +0000 |
---|---|---|
committer | Simon Marlow <marlowsd@gmail.com> | 2008-06-17 10:11:02 +0000 |
commit | 301afae5ce9fd9fde20da4cb12b4b19d98ec53da (patch) | |
tree | 39d987ff4f90b4a77a4083df5e6a761400a735ed /rts/sm/Sweep.c | |
parent | bb9d6c363c927899fd32d3c99bf2af4bdaeee789 (diff) | |
download | haskell-301afae5ce9fd9fde20da4cb12b4b19d98ec53da.tar.gz |
fix some printf formats for 64 bits
Diffstat (limited to 'rts/sm/Sweep.c')
-rw-r--r-- | rts/sm/Sweep.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/sm/Sweep.c b/rts/sm/Sweep.c index 979fe9ccea..873944ce24 100644 --- a/rts/sm/Sweep.c +++ b/rts/sm/Sweep.c @@ -70,7 +70,7 @@ sweep(step *step) step->live_estimate = live; - trace(DEBUG_gc|TRACE_gc, "sweeping: %d blocks, %d were copied, %d freed (%d%%), %d are fragmented, live estimate: %d%%", + trace(DEBUG_gc|TRACE_gc, "sweeping: %d blocks, %d were copied, %d freed (%d%%), %d are fragmented, live estimate: %ld%%", step->n_old_blocks + freed, step->n_old_blocks - blocks + freed, freed, |