Commit 5fb52815 authored by Simon Marlow's avatar Simon Marlow

remove global 'total_allocated', seems to be the same as 'GC_tot_alloc'

parent e33f8e0d
......@@ -813,7 +813,7 @@ statDescribeGens(void)
-------------------------------------------------------------------------- */
extern HsInt64 getAllocations( void )
{ return (HsInt64)total_allocated * sizeof(W_); }
{ return (HsInt64)GC_tot_alloc * sizeof(W_); }
/* -----------------------------------------------------------------------------
Dumping stuff in the stats file, or via the debug message interface
......
......@@ -49,8 +49,6 @@ generation *generations = NULL; /* all the generations */
generation *g0 = NULL; /* generation 0, for convenience */
generation *oldest_gen = NULL; /* oldest generation, for convenience */
ullong total_allocated = 0; /* total memory allocated during run */
nursery *nurseries = NULL; /* array of nurseries, size == n_capabilities */
#ifdef THREADED_RTS
......@@ -789,7 +787,6 @@ calcAllocated( void )
allocated += g0->n_new_large_blocks * BLOCK_SIZE_W;
total_allocated += allocated;
return allocated;
}
......
......@@ -132,8 +132,6 @@ lnat countNurseryBlocks ( void );
Stats 'n' DEBUG stuff
-------------------------------------------------------------------------- */
extern ullong total_allocated;
lnat calcAllocated (void);
lnat calcLiveBlocks (void);
lnat calcLiveWords (void);
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment