diff options
| author | Ömer Sinan Ağacan <omeragacan@gmail.com> | 2020-03-30 11:16:08 +0300 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2020-04-02 01:47:25 -0400 |
| commit | 0a88dd11594b8d8fd20500d026e657a5f99dfdd2 (patch) | |
| tree | 444b39c7a48fc77818c84a1582a17ca9fc185c5c /rts | |
| parent | 42d68364f66846969edf029f878875c10cdfe0b2 (diff) | |
| download | haskell-0a88dd11594b8d8fd20500d026e657a5f99dfdd2.tar.gz | |
Fix a pointer format string in RTS
Diffstat (limited to 'rts')
| -rw-r--r-- | rts/sm/GC.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/sm/GC.c b/rts/sm/GC.c index f6698f5b9e..9cf9774687 100644 --- a/rts/sm/GC.c +++ b/rts/sm/GC.c @@ -1976,7 +1976,7 @@ void gcCAFs(void) // This condition identifies CAFs that have just been GC'd and // don't have static_link==3 which means they should be ignored. if ((((StgWord)(p->static_link)&STATIC_BITS) | prev_static_flag) != 3) { - debugTrace(DEBUG_gccafs, "CAF gc'd at 0x%p", p); + debugTrace(DEBUG_gccafs, "CAF gc'd at %p", p); SET_INFO((StgClosure*)p,&stg_GCD_CAF_info); // stub it if (prev == NULL) { debug_caf_list = (StgIndStatic*)p->saved_info; |