diff options
| -rw-r--r-- | rts/sm/Storage.c | 26 | ||||
| -rw-r--r-- | rts/sm/Storage.h | 3 |
2 files changed, 0 insertions, 29 deletions
diff --git a/rts/sm/Storage.c b/rts/sm/Storage.c index 65f5b70c21..c815b9993e 100644 --- a/rts/sm/Storage.c +++ b/rts/sm/Storage.c @@ -1204,32 +1204,6 @@ W_ gcThreadLiveBlocks (nat i, nat g) return blocks; } -// Return an accurate count of the live data in the heap, excluding -// generation 0. -W_ calcLiveWords (void) -{ - nat g; - W_ live; - - live = 0; - for (g = 0; g < RtsFlags.GcFlags.generations; g++) { - live += genLiveWords(&generations[g]); - } - return live; -} - -W_ calcLiveBlocks (void) -{ - nat g; - W_ live; - - live = 0; - for (g = 0; g < RtsFlags.GcFlags.generations; g++) { - live += genLiveBlocks(&generations[g]); - } - return live; -} - /* Determine which generation will be collected next, and approximate * the maximum amount of memory that will be required to do the GC, * taking into account data that will be copied, and the space needed diff --git a/rts/sm/Storage.h b/rts/sm/Storage.h index d0094b60fb..3dd3ec0472 100644 --- a/rts/sm/Storage.h +++ b/rts/sm/Storage.h @@ -124,9 +124,6 @@ W_ gcThreadLiveBlocks (nat i, nat g); W_ genLiveWords (generation *gen); W_ genLiveBlocks (generation *gen); -W_ calcLiveBlocks (void); -W_ calcLiveWords (void); - /* ---------------------------------------------------------------------------- Storage manager internal APIs and globals ------------------------------------------------------------------------- */ |