diff options
author | Simon Marlow <simonmarhaskell@gmail.com> | 2008-04-16 23:39:22 +0000 |
---|---|---|
committer | Simon Marlow <simonmarhaskell@gmail.com> | 2008-04-16 23:39:22 +0000 |
commit | 9de1ad504a0a12dabd42b206f06ca04fa0e7009a (patch) | |
tree | e9a1f74af3cc20cee343d5a2ff2fe8d2eaca9b01 | |
parent | aa8efe32ce8eebc2fe25f13a11cf214cdcac229f (diff) | |
download | haskell-9de1ad504a0a12dabd42b206f06ca04fa0e7009a.tar.gz |
fix trace
-rw-r--r-- | rts/sm/Scav.c-inc | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/sm/Scav.c-inc b/rts/sm/Scav.c-inc index 93a148afa8..bff193be7c 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; |