[commit: ghc] master: Small simplification (#11777) (83eb4fd)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/83eb4fd97a74a71e9b23b13ed656224a960fd43d/ghc

>---------------------------------------------------------------

commit 83eb4fd97a74a71e9b23b13ed656224a960fd43d
Author: Simon Marlow <marlowsd at gmail.com>
Date:   Mon Apr 11 04:59:36 2016 -0700

    Small simplification (#11777)
    
    DEAD_WEAK used to have a different layout, see
    d61c623ed6b2d352474a7497a65015dbf6a72e12


>---------------------------------------------------------------

83eb4fd97a74a71e9b23b13ed656224a960fd43d
 rts/sm/MarkWeak.c | 6 +-----
 1 file changed, 1 insertion(+), 5 deletions(-)

diff --git a/rts/sm/MarkWeak.c b/rts/sm/MarkWeak.c
index 9a32198..d9f1733 100644
--- a/rts/sm/MarkWeak.c
+++ b/rts/sm/MarkWeak.c
@@ -413,11 +413,7 @@ markWeakPtrList ( void )
 
             evacuate((StgClosure **)last_w);
             w = *last_w;
-            if (w->header.info == &stg_DEAD_WEAK_info) {
-                last_w = &(w->link);
-            } else {
-                last_w = &(w->link);
-            }
+            last_w = &(w->link);
         }
     }
 }