summaryrefslogtreecommitdiff
path: root/rts/sm/Sanity.c
diff options
context:
space:
mode:
Diffstat (limited to 'rts/sm/Sanity.c')
-rw-r--r--rts/sm/Sanity.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/sm/Sanity.c b/rts/sm/Sanity.c
index d3c18adbd5..193a1a884c 100644
--- a/rts/sm/Sanity.c
+++ b/rts/sm/Sanity.c
@@ -330,7 +330,7 @@ checkGenWeakPtrList( uint32_t g )
{
for (StgWeak *w = generations[g].weak_ptr_list; w != NULL; w = w->link) {
ASSERT(LOOKS_LIKE_CLOSURE_PTR(w));
- ASSERT(w->header.info == &stg_WEAK_info);
+ ASSERT(w->header.info == &stg_WEAK_info || w->header.info == &stg_DEAD_WEAK_info);
ASSERT(LOOKS_LIKE_CLOSURE_PTR(w->key));
ASSERT(LOOKS_LIKE_CLOSURE_PTR(w->value));
ASSERT(LOOKS_LIKE_CLOSURE_PTR(w->finalizer));