X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2Fsm%2FStorage.c;fp=rts%2Fsm%2FStorage.c;h=ae3433a9b2a4097aaa7c6e6dc874ef05455f91bf;hb=df521c32ec213d427389228bfbde928ace6a20c5;hp=6c1106567029305ee38b889a4e33c2beca27a29a;hpb=18896fa2b06844407fd1e0d3f85cd3db97a96ff4;p=ghc-hetmet.git

diff --git a/rts/sm/Storage.c b/rts/sm/Storage.c
index 6c11065..ae3433a 100644
--- a/rts/sm/Storage.c
+++ b/rts/sm/Storage.c
@@ -835,8 +835,7 @@ lnat calcLiveWords (void)
 {
     nat g;
     lnat live;
-    generation *gen;
-    
+
     live = 0;
     for (g = 0; g < RtsFlags.GcFlags.generations; g++) {
         live += genLiveWords(&generations[g]);