Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Menu
Open sidebar
Tobias Decking
GHC
Commits
7cb0ffcb
Commit
7cb0ffcb
authored
Oct 19, 2006
by
Simon Marlow
Browse files
rename allocated_bytes() to allocatedBytes()
parent
3633e894
Changes
2
Hide whitespace changes
Inline
Side-by-side
includes/Storage.h
View file @
7cb0ffcb
...
...
@@ -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
_b
ytes(void) Returns the number of bytes allocated
lnat allocated
B
ytes(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
_b
ytes
(
void
);
extern
lnat
allocated
B
ytes
(
void
);
extern
bdescr
*
RTS_VAR
(
small_alloc_list
);
extern
bdescr
*
RTS_VAR
(
large_alloc_list
);
...
...
rts/Storage.c
View file @
7cb0ffcb
...
...
@@ -615,7 +615,7 @@ allocate( nat n )
}
lnat
allocated
_b
ytes
(
void
)
allocated
B
ytes
(
void
)
{
lnat
allocated
;
...
...
@@ -874,7 +874,7 @@ calcAllocated( void )
nat
allocated
;
bdescr
*
bd
;
allocated
=
allocated
_b
ytes
();
allocated
=
allocated
B
ytes
();
allocated
+=
countNurseryBlocks
()
*
BLOCK_SIZE_W
;
{
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment