X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=rts%2Fsm%2FMarkWeak.c;fp=rts%2Fsm%2FMarkWeak.c;h=f4b576ac735bed0b1f12a3b1ea70fc08473cc963;hp=72f0ade797ef087956f218dd2d105ed066411358;hb=bef3da1e26639303fccbf26c312d2833eedb486e;hpb=c226846642a2201762ee34f6f71b42f13bc46629

diff --git a/rts/sm/MarkWeak.c b/rts/sm/MarkWeak.c
index 72f0ade..f4b576a 100644
--- a/rts/sm/MarkWeak.c
+++ b/rts/sm/MarkWeak.c
@@ -110,7 +110,7 @@ traverseWeakPtrList(void)
       /* doesn't matter where we evacuate values/finalizers to, since
        * these pointers are treated as roots (iff the keys are alive).
        */
-      gct->evac_gen = 0;
+      gct->evac_gen_no = 0;
       
       last_w = &old_weak_ptr_list;
       for (w = old_weak_ptr_list; w != NULL; w = next_w) {