diff options
| author | Simon Marlow <simonmar@microsoft.com> | 2006-06-16 14:07:50 +0000 |
|---|---|---|
| committer | Simon Marlow <simonmar@microsoft.com> | 2006-06-16 14:07:50 +0000 |
| commit | c113e097ec1f3e864d0daefa76139686b9c1c312 (patch) | |
| tree | ab3adb3b3c6fe4cbb3ba770803cf71d3fa58bfaa /rts | |
| parent | 48ff2a03397d744e4b24797d7b16fdaf6feb576a (diff) | |
| download | haskell-c113e097ec1f3e864d0daefa76139686b9c1c312.tar.gz | |
comment out a non-true assertion
Diffstat (limited to 'rts')
| -rw-r--r-- | rts/Threads.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/Threads.c b/rts/Threads.c index b550cc6aaa..f6c28007e9 100644 --- a/rts/Threads.c +++ b/rts/Threads.c @@ -485,7 +485,7 @@ unblockOne_ (Capability *cap, StgTSO *tso, { StgTSO *next; - ASSERT(get_itbl(tso)->type == TSO); + // NO, might be a WHITEHOLE: ASSERT(get_itbl(tso)->type == TSO); ASSERT(tso->why_blocked != NotBlocked); tso->why_blocked = NotBlocked; |