simon/tiny_httpd
1
0
Fork 0
mirror of https://github.com/c-cube/tiny_httpd.git synced 2025-12-06 11:15:35 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

fix: also make server socket nonblocking

Browse source
This commit is contained in:
Simon Cruanes 2024-09-03 15:40:26 -04:00
parent cf9c14b1c2
commit e199162e1f
No known key found for this signature in database
GPG key ID: EBFFF6F283F3A2B4
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/moonpool-io/io_server.ml
View file

@ -122,7 +122,7 @@ let to_tcp_server (self : t) : IO.TCP_server.builder =
let fd = Fd.create sock in
fd, true (* Because we're creating the socket ourselves *)
in
MIO.Unix.clear_nonblock sock;
MIO.Unix.set_nonblock sock;
MIO.Unix.setsockopt_optint sock Unix.SO_LINGER None;
if should_bind then (
let inet_addr = Unix.inet_addr_of_string self.addr in