diff options
| author | Simon Marlow <marlowsd@gmail.com> | 2008-06-08 07:37:54 +0000 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2008-06-08 07:37:54 +0000 |
| commit | a7f2a897bab20f05d4cf5fc8cdae328698c7fc82 (patch) | |
| tree | 9bff86156decaebc7e192e3218940f2ecea3669d /rts/sm/BlockAlloc.h | |
| parent | b339c8b1d0f239031802555b454062e9430ec8bb (diff) | |
| download | haskell-a7f2a897bab20f05d4cf5fc8cdae328698c7fc82.tar.gz | |
fix allocated blocks calculation, and add more sanity checks
Diffstat (limited to 'rts/sm/BlockAlloc.h')
| -rw-r--r-- | rts/sm/BlockAlloc.h | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/rts/sm/BlockAlloc.h b/rts/sm/BlockAlloc.h index 1472ac6f76..2d777f7cae 100644 --- a/rts/sm/BlockAlloc.h +++ b/rts/sm/BlockAlloc.h @@ -16,4 +16,7 @@ extern void checkFreeListSanity(void); nat countFreeList(void); #endif +lnat n_alloc_blocks; // currently allocated blocks +lnat hw_alloc_blocks; // high-water allocated blocks + #endif /* BLOCK_ALLOC_H */ |