summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--includes/Storage.h4
-rw-r--r--rts/Storage.c4
2 files changed, 4 insertions, 4 deletions
diff --git a/includes/Storage.h b/includes/Storage.h
index 0b93378083..1346715ffb 100644
--- a/includes/Storage.h
+++ b/includes/Storage.h
@@ -137,7 +137,7 @@ extern void freeStorage(void);
rtsBool doYouWantToGC(void) Returns True if the storage manager is
ready to perform a GC, False otherwise.
- lnat allocated_bytes(void) Returns the number of bytes allocated
+ lnat allocatedBytes(void) Returns the number of bytes allocated
via allocate() since the last GC.
Used in the reporting of statistics.
@@ -148,7 +148,7 @@ extern void freeStorage(void);
extern StgPtr allocate ( nat n );
extern StgPtr allocateLocal ( Capability *cap, nat n );
extern StgPtr allocatePinned ( nat n );
-extern lnat allocated_bytes ( void );
+extern lnat allocatedBytes ( void );
extern bdescr * RTS_VAR(small_alloc_list);
extern bdescr * RTS_VAR(large_alloc_list);
diff --git a/rts/Storage.c b/rts/Storage.c
index 0c9c60e580..a657ce8d3e 100644
--- a/rts/Storage.c
+++ b/rts/Storage.c
@@ -615,7 +615,7 @@ allocate( nat n )
}
lnat
-allocated_bytes( void )
+allocatedBytes( void )
{
lnat allocated;
@@ -874,7 +874,7 @@ calcAllocated( void )
nat allocated;
bdescr *bd;
- allocated = allocated_bytes();
+ allocated = allocatedBytes();
allocated += countNurseryBlocks() * BLOCK_SIZE_W;
{