diff options
| author | Simon Marlow <marlowsd@gmail.com> | 2014-11-21 17:05:58 +0000 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2014-11-25 14:37:26 +0000 |
| commit | 452eb80f15fce8665df52bc9facebfafb5b6267b (patch) | |
| tree | a34e76ab765b6d1db49b1c05372f8924e52cacf9 /rts/sm/Storage.h | |
| parent | e22bc0dedb9e9da0176ad7ce4a74acbefedc7207 (diff) | |
| download | haskell-452eb80f15fce8665df52bc9facebfafb5b6267b.tar.gz | |
Add +RTS -n<size>: divide the nursery into chunks
See the documentation for details.
Diffstat (limited to 'rts/sm/Storage.h')
| -rw-r--r-- | rts/sm/Storage.h | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/rts/sm/Storage.h b/rts/sm/Storage.h index 943c3e39b7..a4421db3f2 100644 --- a/rts/sm/Storage.h +++ b/rts/sm/Storage.h @@ -80,12 +80,14 @@ void dirty_TVAR(Capability *cap, StgTVar *p); -------------------------------------------------------------------------- */ extern nursery *nurseries; +extern nat n_nurseries; void resetNurseries ( void ); void clearNursery ( Capability *cap ); void resizeNurseries ( W_ blocks ); -void resizeNurseriesFixed ( W_ blocks ); +void resizeNurseriesFixed ( void ); W_ countNurseryBlocks ( void ); +rtsBool getNewNursery ( Capability *cap ); /* ----------------------------------------------------------------------------- Allocation accounting |