diff options
| author | Simon Marlow <marlowsd@gmail.com> | 2008-07-15 13:03:16 +0000 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2008-07-15 13:03:16 +0000 |
| commit | 6ca83f41edc4d4db300e129f123fc42eb40a43b0 (patch) | |
| tree | 79342e6db9ded4025a869690ab9bfa14452b6633 /rts/Schedule.c | |
| parent | c52eb69bb2f51fed830db42f22bab74c6ff05565 (diff) | |
| download | haskell-6ca83f41edc4d4db300e129f123fc42eb40a43b0.tar.gz | |
non-threaded RTS: don't assume deadlock if there are signal handlers to run
Diffstat (limited to 'rts/Schedule.c')
| -rw-r--r-- | rts/Schedule.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/rts/Schedule.c b/rts/Schedule.c index fd84fde490..ce6a1db705 100644 --- a/rts/Schedule.c +++ b/rts/Schedule.c @@ -1005,6 +1005,8 @@ scheduleDetectDeadlock (Capability *cap, Task *task) // either we have threads to run, or we were interrupted: ASSERT(!emptyRunQueue(cap) || sched_state >= SCHED_INTERRUPTING); + + return; } #endif |