Add a case for IND (and a comment). Fixes #3424, perhaps only partially.

[ghc-hetmet.git] / rts / sm / Storage.c

diff --git a/rts/sm/Storage.c b/rts/sm/Storage.c
index 59a41b0..19ccdfb 100644 (file)
--- a/rts/sm/Storage.c
+++ b/rts/sm/Storage.c
@@ -253,7 +253,7 @@ initStorage( void )
 
 #ifdef THREADED_RTS
   initSpinLock(&gc_alloc_block_sync);
-  whitehole_spin = 0;
+  evac_collision = 0;
 #endif
 
   N = 0;