diff options
Diffstat (limited to 'rts/sm/Sanity.c')
-rw-r--r-- | rts/sm/Sanity.c | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/rts/sm/Sanity.c b/rts/sm/Sanity.c index fa497251e2..7fcc601bbd 100644 --- a/rts/sm/Sanity.c +++ b/rts/sm/Sanity.c @@ -740,11 +740,10 @@ checkSTACK (StgStack *stack) void checkTSO(StgTSO *tso) { - StgTSO *next = tso->_link; const StgInfoTable *info = (const StgInfoTable*) tso->_link->header.info; load_load_barrier(); - ASSERT(next == END_TSO_QUEUE || + ASSERT(tso->_link == END_TSO_QUEUE || info == &stg_MVAR_TSO_QUEUE_info || info == &stg_TSO_info || info == &stg_WHITEHOLE_info); // used to happen due to STM doing |