diff options
| author | Sergei Trofimovich <slyfox@gentoo.org> | 2014-05-23 23:58:06 +0300 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2014-06-08 11:21:11 +0100 |
| commit | 9fd507e5758f4141ac2619f0db57136bcab035c6 (patch) | |
| tree | 2eb2d698e7d0b634804dd1753400395f352eb00e /rts/win32 | |
| parent | 2f8b4c9330b455d4cb31c186c747a7db12a69251 (diff) | |
| download | haskell-9fd507e5758f4141ac2619f0db57136bcab035c6.tar.gz | |
Raise exceptions when blocked in bad FDs (fixes Trac #4934)
Before the patch any call to 'select()' with 'bad_fd' led to:
- unblocking of all threads
- hiding exception for 'threadWaitRead bad_fd'
The patch fixes both cases in this way:
after 'select()' failure we iterate over each blocked descriptor
and poll individually to see it's actual status, which is:
- READY (move to run queue)
- BLOCKED (leave in blocked queue)
- INVALID (send an IOErrror exception)
Signed-off-by: Sergei Trofimovich <slyfox@gentoo.org>
Diffstat (limited to 'rts/win32')
| -rw-r--r-- | rts/win32/libHSbase.def | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/rts/win32/libHSbase.def b/rts/win32/libHSbase.def index 119237b652..8140528c70 100644 --- a/rts/win32/libHSbase.def +++ b/rts/win32/libHSbase.def @@ -40,5 +40,4 @@ EXPORTS base_ControlziExceptionziBase_nonTermination_closure base_ControlziExceptionziBase_nestedAtomically_closure - - + base_GHCziEventziThread_blockedOnBadFD_closure |