summaryrefslogtreecommitdiff
path: root/rts/sm/Sweep.c
diff options
context:
space:
mode:
authorSimon Marlow <marlowsd@gmail.com>2008-06-17 10:11:02 +0000
committerSimon Marlow <marlowsd@gmail.com>2008-06-17 10:11:02 +0000
commit301afae5ce9fd9fde20da4cb12b4b19d98ec53da (patch)
tree39d987ff4f90b4a77a4083df5e6a761400a735ed /rts/sm/Sweep.c
parentbb9d6c363c927899fd32d3c99bf2af4bdaeee789 (diff)
downloadhaskell-301afae5ce9fd9fde20da4cb12b4b19d98ec53da.tar.gz
fix some printf formats for 64 bits
Diffstat (limited to 'rts/sm/Sweep.c')
-rw-r--r--rts/sm/Sweep.c2
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,