rts: drop unused calcLiveBlocks, calcLiveWords
authorSergei Trofimovich <siarheit@google.com>
Sun, 7 Feb 2016 15:55:44 +0000 (15:55 +0000)
committerSergei Trofimovich <siarheit@google.com>
Sun, 7 Feb 2016 20:26:42 +0000 (20:26 +0000)
Use of these helper functions was removed by
  commit 18896fa2b06844407fd1e0d3f85cd3db97a96ff4
  Author: Simon Marlow <marlowsd@gmail.com>
  Date:   Wed Feb 2 15:49:55 2011 +0000

Noticed by uselex.rb:
    calcLiveBlocks: [R]: exported from:
        ./rts/dist/build/sm/Storage.o
    calcLiveWords: [R]: exported from:
        ./rts/dist/build/sm/Storage.o

Signed-off-by: Sergei Trofimovich <siarheit@google.com>
rts/sm/Storage.c
rts/sm/Storage.h

index 65f5b70..c815b99 100644 (file)
@@ -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
index d0094b6..3dd3ec0 100644 (file)
@@ -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
    ------------------------------------------------------------------------- */