X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2Fsm%2FGC.c;h=f8a0980e512e2b9d76ff7c6b3bb023339313c650;hb=886d3dbfc27a159da9c38cc237517a3036ac3a8f;hp=c254fcb54fe96f659c2e93dd4e1aee14edf9d565;hpb=128a7fae5da321c24008b1d53ece0a8b58912c82;p=ghc-hetmet.git

diff --git a/rts/sm/GC.c b/rts/sm/GC.c
index c254fcb..f8a0980 100644
--- a/rts/sm/GC.c
+++ b/rts/sm/GC.c
@@ -494,8 +494,6 @@ GarbageCollect ( rtsBool force_major_gc )
           sweep(&oldest_gen->steps[0]);
   }
 
-  IF_DEBUG(sanity, checkGlobalTSOList(rtsFalse));
-
   /* run through all the generations/steps and tidy up 
    */
   copied = 0;