X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=rts%2Fsm%2FStorage.c;h=bf7c452d9be185b4954e37cb567a032e40845524;hp=6c45cbed594a94c702af06d44d3fec4a57b0990f;hb=3ebcd3deb769a03f4ded0fca2cf38201048c0214;hpb=c373ebdb90edee470ad6fa8277cbe7aa369f23f8

diff --git a/rts/sm/Storage.c b/rts/sm/Storage.c
index 6c45cbe..bf7c452 100644
--- a/rts/sm/Storage.c
+++ b/rts/sm/Storage.c
@@ -276,6 +276,10 @@ initStorage( void )
   whitehole_spin = 0;
 #endif
 
+  N = 0;
+
+  initGcThreads();
+
   IF_DEBUG(gc, statDescribeGens());
 
   RELEASE_SM_LOCK;