diff --git a/ghc/rts/Updates.h b/ghc/rts/Updates.h
index 33d7d258e64e..37bb9a289630 100644
--- a/ghc/rts/Updates.h
+++ b/ghc/rts/Updates.h
@@ -264,8 +264,8 @@ DEBUG_FILL_SLOP(StgClosure *p)
     W_ bd;							\
 								\
     DEBUG_FILL_SLOP(p1);					\
-    StgInd_indirectee(p1) = p2;					\
     LDV_RECORD_DEAD_FILL_SLOP_DYNAMIC(p1);			\
+    StgInd_indirectee(p1) = p2;					\
     bd = Bdescr(p1);						\
     if (bdescr_gen_no(bd) != 0 :: CInt) {			\
       foreign "C" recordMutableCap(p1 "ptr",			\