X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2Fsm%2FGC.c;h=09e2b2c2f87ae51d358eeb108b2cdacceaafb413;hb=ea661992b7397eddee145b80a449c40ab565fd12;hp=0d2ba85860fd36a996af6e69dceff1a820c8e84f;hpb=06f9b7c365fb9e9b53723f892b4d63b4f7a56e9a;p=ghc-hetmet.git

diff --git a/rts/sm/GC.c b/rts/sm/GC.c
index 0d2ba85..09e2b2c 100644
--- a/rts/sm/GC.c
+++ b/rts/sm/GC.c
@@ -274,12 +274,6 @@ GarbageCollect ( rtsBool force_major_gc )
   static_objects = END_OF_STATIC_LIST;
   scavenged_static_objects = END_OF_STATIC_LIST;
 
-#ifdef THREADED_RTS
-  initSpinLock(&static_objects_sync);
-  initSpinLock(&recordMutableGen_sync);
-  initSpinLock(&gc_alloc_block_sync);
-#endif
-
   // Initialise all the generations/steps that we're collecting.
   for (g = 0; g <= N; g++) {
       init_collected_gen(g,n_gc_threads);