Sourcetype allowed_ciphers = [ | `Only of string list| `Openssl_default| `Secure
] Sourcetype ssl_version = [ | `Ssl_not_compiled_in
] Sourcetype session = [ | `Ssl_not_compiled_in
] Sourcetype ssl_opt = [ | `Ssl_not_compiled_in
] Sourcetype ssl_conn = [ | `Ssl_not_compiled_in
] Sourcetype addr = [ | `OpenSSL of Ipaddr.t * int * Ssl.Config.t| `TCP of Ipaddr.t * int| `Unix_domain_socket of string
] Sourcetype trust_chain = [ | `Ca_file of string| `Ca_path of string| `Search_file_first_then_path of [ `File of string ] * [ `Path of string ]
] Sourcetype openssl = [ | `OpenSSL of [ `Crt_file_path of string ] * [ `Key_file_path of string ]
] Sourceval serve :
?max_connections:int ->
?backlog:int ->
?buffer_age_limit:Async.Writer.buffer_age_limit ->
on_handler_error:
[ `Call of ([< Async.Socket.Address.t ] as 'a) -> exn -> unit
| `Ignore
| `Raise ] ->
server ->
('a, 'b) Async.Tcp.Where_to_listen.t ->
('a -> Async.Reader.t -> Async.Writer.t -> unit Async.Deferred.t) ->
('a, 'b) Async.Tcp.Server.t Async.Deferred.t