projects
/
ghc-hetmet.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
f50d2bf
)
[project @ 2005-04-05 09:30:11 by simonmar]
author
simonmar
<unknown>
Tue, 5 Apr 2005 09:30:11 +0000
(09:30 +0000)
committer
simonmar
<unknown>
Tue, 5 Apr 2005 09:30:11 +0000
(09:30 +0000)
printf format type fixup
ghc/rts/ProfHeap.c
patch
|
blob
|
history
diff --git
a/ghc/rts/ProfHeap.c
b/ghc/rts/ProfHeap.c
index
1125fd0
..
c475545
100644
(file)
--- a/
ghc/rts/ProfHeap.c
+++ b/
ghc/rts/ProfHeap.c
@@
-530,7
+530,7
@@
fprint_ccs(FILE *fp, CostCentreStack *ccs, nat max_length)
return;
}
return;
}
- fprintf(fp, "(%d)", ccs->ccsID);
+ fprintf(fp, "(%ld)", ccs->ccsID);
p = buf;
buf_end = buf + max_length + 1;
p = buf;
buf_end = buf + max_length + 1;
@@
-745,14
+745,14
@@
dumpCensus( Census *census )
#ifdef PROFILING
if (RtsFlags.ProfFlags.doHeapProfile == HEAP_BY_LDV) {
#ifdef PROFILING
if (RtsFlags.ProfFlags.doHeapProfile == HEAP_BY_LDV) {
- fprintf(hp_file, "VOID\t%u\n", census->void_total * sizeof(W_));
- fprintf(hp_file, "LAG\t%u\n",
+ fprintf(hp_file, "VOID\t%lu\n", census->void_total * sizeof(W_));
+ fprintf(hp_file, "LAG\t%lu\n",
(census->not_used - census->void_total) * sizeof(W_));
(census->not_used - census->void_total) * sizeof(W_));
- fprintf(hp_file, "USE\t%u\n",
+ fprintf(hp_file, "USE\t%lu\n",
(census->used - census->drag_total) * sizeof(W_));
(census->used - census->drag_total) * sizeof(W_));
- fprintf(hp_file, "INHERENT_USE\t%u\n",
+ fprintf(hp_file, "INHERENT_USE\t%lu\n",
census->prim * sizeof(W_));
census->prim * sizeof(W_));
- fprintf(hp_file, "DRAG\t%u\n", census->drag_total *
+ fprintf(hp_file, "DRAG\t%lu\n", census->drag_total *
sizeof(W_));
printSample(rtsFalse, census->time);
return;
sizeof(W_));
printSample(rtsFalse, census->time);
return;
@@
-831,7
+831,7
@@
dumpCensus( Census *census )
}
#endif
}
#endif
- fprintf(hp_file, "\t%d\n", count * sizeof(W_));
+ fprintf(hp_file, "\t%ld\n", count * sizeof(W_));
}
printSample(rtsFalse, census->time);
}
printSample(rtsFalse, census->time);