Skip to content

Commit 8118c1f

Browse files
haesbaerttalex5
authored andcommitted
Remove EINPROGRESS from do_nonblocking
It's only returned for `connect`, which does its own thing.
1 parent 8164a13 commit 8118c1f

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

lib_eio_posix/low_level.ml

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -26,7 +26,7 @@ let await_writable fd =
2626
let rec do_nonblocking ty fn fd =
2727
try fn fd with
2828
| Unix.Unix_error (EINTR, _, _) -> do_nonblocking ty fn fd (* Just in case *)
29-
| Unix.Unix_error((EAGAIN | EWOULDBLOCK | EINPROGRESS), _, _) ->
29+
| Unix.Unix_error((EAGAIN | EWOULDBLOCK), _, _) ->
3030
Sched.enter (fun t k ->
3131
match ty with
3232
| Read -> Sched.await_readable t k fd

0 commit comments

Comments
 (0)