From 7cb0ffcb5a7e6f6ae4cce2adf61b3a3e78bbd78c Mon Sep 17 00:00:00 2001
From: Simon Marlow <simonmar@microsoft.com>
Date: Thu, 19 Oct 2006 10:11:29 +0000
Subject: [PATCH] rename allocated_bytes() to allocatedBytes()
---
includes/Storage.h | 4 ++--
rts/Storage.c | 4 ++--
2 files changed, 4 insertions(+), 4 deletions(-)
diff --git a/includes/Storage.h b/includes/Storage.h
index 0b933780833..1346715ffb7 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 0c9c60e5806..a657ce8d3e7 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;
{
--
GitLab