浏览代码

change concurrency level for ocaml/tiny_httpd (#6209)

see if it affects latency
Simon Cruanes 4 年之前
父节点
当前提交
8cbf35a5f5
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      frameworks/OCaml/tiny_httpd/src/src/bin/tiny.ml

+ 1 - 1
frameworks/OCaml/tiny_httpd/src/src/bin/tiny.ml

@@ -1,7 +1,7 @@
 module S = Tiny_httpd
 module S = Tiny_httpd
 
 
 let () =
 let () =
-  let server = S.create ~addr:"0.0.0.0" () in
+  let server = S.create ~addr:"0.0.0.0" ~max_connections:256 () in
   let headers = [ ("Server", "tiny_httpd") ] in
   let headers = [ ("Server", "tiny_httpd") ] in
   (* say hello *)
   (* say hello *)
   S.add_route_handler ~meth:`GET server
   S.add_route_handler ~meth:`GET server