Permalink
Browse files

mq_server: set TCP_NODELAY in socket.

  • Loading branch information...
1 parent 35e701b commit fef36b6e3ab5c17e4046f27e1bbaf0d861aed22f @mfp committed Nov 11, 2010
Showing with 1 addition and 0 deletions.
  1. +1 −0 mq_server.ml
View
1 mq_server.ml
@@ -575,6 +575,7 @@ let server_loop ?(debug = false) broker =
let rec loop () =
(try_lwt
lwt (fd, addr) = Lwt_unix.accept broker.b_socket in
+ Lwt_unix.setsockopt fd Unix.TCP_NODELAY true;
ignore_result (establish_connection broker fd) addr;
return ()
with e ->

0 comments on commit fef36b6

Please sign in to comment.