From 9de1ad504a0a12dabd42b206f06ca04fa0e7009a Mon Sep 17 00:00:00 2001 From: Simon Marlow Date: Wed, 16 Apr 2008 23:39:22 +0000 Subject: [PATCH] fix trace --- rts/sm/Scav.c-inc | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/rts/sm/Scav.c-inc b/rts/sm/Scav.c-inc index 93a148a..bff193b 100644 --- a/rts/sm/Scav.c-inc +++ b/rts/sm/Scav.c-inc @@ -48,7 +48,7 @@ scavenge_block (bdescr *bd) step_workspace *ws; debugTrace(DEBUG_gc, "scavenging block %p (gen %d, step %d) @ %p", - bd->start, bd->gen_no, bd->step->no, p); + bd->start, bd->gen_no, bd->step->no, bd->u.scan); gct->scan_bd = bd; gct->evac_step = bd->step; -- 1.7.10.4