X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FUpdates.h;h=10fa09b0e578eca0a72d3e14ec8d090bbbe26f20;hb=a11662957fa688997e6c4befff44e7efe94c2db8;hp=98e9e5a55397e59e27b0cb2b76a6ee30c3aee0b4;hpb=b55e7b53eb4af373764969ab9cfd5a4ef4bc9b8d;p=ghc-hetmet.git

diff --git a/rts/Updates.h b/rts/Updates.h
index 98e9e5a..10fa09b 100644
--- a/rts/Updates.h
+++ b/rts/Updates.h
@@ -268,7 +268,7 @@ no_slop:
     write_barrier();						\
     bd = Bdescr((P_)p1);					\
     if (bd->gen_no != 0) {					\
-      recordMutableGenLock(p1, &generations[bd->gen_no]);	\
+      recordMutableGenLock(p1, bd->gen_no);			\
       SET_INFO(p1, &stg_IND_OLDGEN_info);			\
       TICK_UPD_OLD_IND();					\
       and_then;							\