diff options
Diffstat (limited to 'rts/Sanity.c')
| -rw-r--r-- | rts/Sanity.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/rts/Sanity.c b/rts/Sanity.c index a2ddff87d6..dcb6e5b5ea 100644 --- a/rts/Sanity.c +++ b/rts/Sanity.c @@ -256,7 +256,8 @@ checkClosure( StgClosure* p ) info = get_itbl(p); switch (info->type) { - case MVAR: + case MVAR_CLEAN: + case MVAR_DIRTY: { StgMVar *mvar = (StgMVar *)p; ASSERT(LOOKS_LIKE_CLOSURE_PTR(mvar->head)); |