X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=rts%2FProfHeap.c;h=3f2b9f6c22396089a20f866ecf1d7c99e4f2ff59;hp=f1a3b05ce49bc27be37b0565148bda562c67a5b2;hb=629e852d8202408216e0cbb8362d1eb4beffbfcc;hpb=8966ae35cc8ae7a0b415b7fe1a4f6f76efec6f92

diff --git a/rts/ProfHeap.c b/rts/ProfHeap.c
index f1a3b05..3f2b9f6 100644
--- a/rts/ProfHeap.c
+++ b/rts/ProfHeap.c
@@ -217,7 +217,6 @@ closureIdentity( StgClosure *p )
         case CONSTR_0_2:
         case CONSTR_STATIC:
         case CONSTR_NOCAF_STATIC:
-            printf("",strlen(GET_CON_DESC(itbl_to_con_itbl(info))));
             return GET_CON_DESC(itbl_to_con_itbl(info));
         default:
             return type_names[info->type];