X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FTicky.c;h=140a705eaea5b888f1cf0f58c293afb7468a29eb;hb=6cf8982ac30be6836a0cdd8be5a6ac1a1a144213;hp=ff700df2348b7c1884fe8f6095bd4a0ff92e647a;hpb=ba67234542412c2ca6656dbeadb7d225bc94d4b2;p=ghc-hetmet.git diff --git a/rts/Ticky.c b/rts/Ticky.c index ff700df..140a705 100644 --- a/rts/Ticky.c +++ b/rts/Ticky.c @@ -307,9 +307,6 @@ PrintTickyInfo(void) PC(INTAVG(tot_old_updates,tot_gengc_updates))); } - fprintf(tf,"\nTotal bytes copied during GC: %ld\n", - GC_WORDS_COPIED_ctr * sizeof(W_)); - printRegisteredCounterInfo(tf); fprintf(tf,"\n**************************************************\n"); @@ -567,7 +564,6 @@ PrintTickyInfo(void) PR_CTR(GC_SEL_MINOR_ctr); PR_CTR(GC_SEL_MAJOR_ctr); PR_CTR(GC_FAILED_PROMOTION_ctr); - PR_CTR(GC_WORDS_COPIED_ctr); } /* To print out all the registered-counter info: */ @@ -586,11 +582,11 @@ printRegisteredCounterInfo (FILE *tf) /* Function name at the end so it doesn't mess up the tabulation */ for (p = ticky_entry_ctrs; p != NULL; p = p->link) { - fprintf(tf, "%11ld%11ld %6zu%6zu %-11s%-30s", + fprintf(tf, "%11ld%11ld %6lu%6lu %-11s%-30s", p->entry_count, p->allocs, - p->arity, - p->stk_args, + (unsigned long)p->arity, + (unsigned long)p->stk_args, p->arg_kinds, p->str);