diff options
Diffstat (limited to 'rts/LdvProfile.c')
| -rw-r--r-- | rts/LdvProfile.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/rts/LdvProfile.c b/rts/LdvProfile.c index 4a2ee42424..1dfdc56b34 100644 --- a/rts/LdvProfile.c +++ b/rts/LdvProfile.c @@ -27,10 +27,10 @@ * closure. Returns the size of the closure, including the profiling * header portion, so that the caller can find the next closure. * ----------------------------------------------------------------------- */ -STATIC_INLINE nat +STATIC_INLINE uint32_t processHeapClosureForDead( StgClosure *c ) { - nat size; + uint32_t size; const StgInfoTable *info; info = get_itbl(c); @@ -216,9 +216,9 @@ processChainForDead( bdescr *bd ) * have just been garbage collected. * ----------------------------------------------------------------------- */ void -LdvCensusForDead( nat N ) +LdvCensusForDead( uint32_t N ) { - nat g; + uint32_t g; // ldvTime == 0 means that LDV profiling is currently turned off. if (era == 0) |