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

Stop listening after accept loop

Browse source
This commit is contained in:
Stéphane Lavergne 2023-08-07 10:49:04 -04:00
parent 6560d4b865
commit 60dc366bd2
1 changed files with 1 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
src/Tiny_httpd_server.ml
View file

@ -973,6 +973,7 @@ module Unix_tcp_server_ = struct
done; done;
(* Wait for all threads to be done: this only works if all threads are done. *) (* Wait for all threads to be done: this only works if all threads are done. *)
Unix.close sock;
Sem_.acquire self.sem_max_connections.max self.sem_max_connections; Sem_.acquire self.sem_max_connections.max self.sem_max_connections;
()); ());
} }