Fix a pointer format string in RTS

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;