X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FUpdates.cmm;h=1d2fc5fe0fb4c1a747d86d92ae0fc61f05437d41;hb=3c245de9199f522f75ace92219256badbd928bd6;hp=02d182764f802209cfdeed3374d98f29500450ab;hpb=b4dae163a4830e1984a656cdf66df957e840c77d;p=ghc-hetmet.git

diff --git a/ghc/rts/Updates.cmm b/ghc/rts/Updates.cmm
index 02d1827..1d2fc5f 100644
--- a/ghc/rts/Updates.cmm
+++ b/ghc/rts/Updates.cmm
@@ -102,6 +102,20 @@ INFO_TABLE_RET( stg_upd_frame,
 	    )
 UPD_FRAME_ENTRY_TEMPLATE(,stg_IND_direct_info,%ENTRY_CODE(Sp(0)))
 
+
+INFO_TABLE_RET( stg_marked_upd_frame, 
+	    UPD_FRAME_WORDS, UPD_FRAME_BITMAP, UPDATE_FRAME,
+	    stg_upd_frame_0_ret,
+	    stg_upd_frame_1_ret,
+	    stg_upd_frame_2_ret,
+	    stg_upd_frame_3_ret,
+	    stg_upd_frame_4_ret,
+	    stg_upd_frame_5_ret,
+	    stg_upd_frame_6_ret,
+	    stg_upd_frame_7_ret
+	    )
+UPD_FRAME_ENTRY_TEMPLATE(,stg_IND_direct_info,%ENTRY_CODE(Sp(0)))
+
 /*-----------------------------------------------------------------------------
   Seq frames