diff options
| author | Simon Marlow <marlowsd@gmail.com> | 2009-12-02 12:38:06 +0000 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2009-12-02 12:38:06 +0000 |
| commit | f6013eedb4dea47afac8167dfa08561ae90454db (patch) | |
| tree | 31c1b07b14e86f60b2af3187f9ce0ec2ed3e0ca1 /rts/sm/Storage.h | |
| parent | 51741bdea146fbc65ad3509c8f97a5ebff1433de (diff) | |
| download | haskell-f6013eedb4dea47afac8167dfa08561ae90454db.tar.gz | |
Refactoring only
Diffstat (limited to 'rts/sm/Storage.h')
| -rw-r--r-- | rts/sm/Storage.h | 8 |
1 files changed, 2 insertions, 6 deletions
diff --git a/rts/sm/Storage.h b/rts/sm/Storage.h index f810a858a3..02f5637515 100644 --- a/rts/sm/Storage.h +++ b/rts/sm/Storage.h @@ -139,17 +139,13 @@ lnat calcLiveBlocks (void); lnat calcLiveWords (void); lnat countOccupied (bdescr *bd); lnat calcNeeded (void); -HsInt64 getAllocations (void); - -#if defined(DEBUG) -void memInventory (rtsBool show); -nat countBlocks (bdescr *); -#endif /* ---------------------------------------------------------------------------- Storage manager internal APIs and globals ------------------------------------------------------------------------- */ +extern bdescr *exec_block; + #define END_OF_STATIC_LIST ((StgClosure*)1) void move_TSO (StgTSO *src, StgTSO *dest); |