diff options
Diffstat (limited to 'rts')
-rw-r--r-- | rts/ProfHeap.c | 2 | ||||
-rw-r--r-- | rts/Profiling.c | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/rts/ProfHeap.c b/rts/ProfHeap.c index 187116fdbc..a7ea3eb565 100644 --- a/rts/ProfHeap.c +++ b/rts/ProfHeap.c @@ -515,7 +515,7 @@ fprint_ccs(FILE *fp, CostCentreStack *ccs, nat max_length) return; } - fprintf(fp, "(%ld)", ccs->ccsID); + fprintf(fp, "(%" FMT_Int ")", ccs->ccsID); p = buf; buf_end = buf + max_length + 1; diff --git a/rts/Profiling.c b/rts/Profiling.c index c67b0817df..4f2606c8b4 100644 --- a/rts/Profiling.c +++ b/rts/Profiling.c @@ -951,7 +951,7 @@ logCCS(CostCentreStack *ccs, nat indent, max_module_len - strlen_utf8(cc->module), ""); fprintf(prof_file, - " %*ld %11" FMT_Word64 " %5.1f %5.1f %5.1f %5.1f", + " %*" FMT_Int "%11" FMT_Word64 " %5.1f %5.1f %5.1f %5.1f", max_id_len, ccs->ccsID, ccs->scc_count, total_prof_ticks == 0 ? 0.0 : ((double)ccs->time_ticks / (double)total_prof_ticks * 100.0), total_alloc == 0 ? 0.0 : ((double)ccs->mem_alloc / (double)total_alloc * 100.0), |