X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2Fwin32%2FAwaitEvent.c;h=1b92c4386f483807721439d3e018671c2c15a5d4;hb=c5e9e31045f8f96a87c0d0793af33cb83c3da5d7;hp=2175626313f340442faab559908b953b7c382a2d;hpb=4a875d65b5c86a77a3051256519f9695d701c3be;p=ghc-hetmet.git diff --git a/rts/win32/AwaitEvent.c b/rts/win32/AwaitEvent.c index 2175626..1b92c43 100644 --- a/rts/win32/AwaitEvent.c +++ b/rts/win32/AwaitEvent.c @@ -45,14 +45,11 @@ awaitEvent(rtsBool wait) return; } - if (!ret) { - return; /* still hold the lock */ - } - - // Return to the scheduler if: + // The return value from awaitRequests() is a red herring: ignore + // it. Return to the scheduler if !wait, or // // - we were interrupted - // - new threads have arrived + // - the run-queue is now non- empty } while (wait && sched_state == SCHED_RUNNING