Sourcetype listen_opts = {reuse_addr : bool;reuse_port : bool;backlog : int;addr : string;
} Sourcetype timeout = | Infinity| Bounded of float
Sourcetype unix_error = [ | `Unix_error of Unix.error
] Sourcetype nonrec ('ok, 'err) result = ('ok, 'err) Stdlib.result constraint 'err = [> unix_error ] Sourceval controlling_process : 'a -> new_owner:'b -> (unit, 'c) result val pp : Stdlib.Format.formatter -> _ socket -> unitSourceval pp_err :
Stdlib.Format.formatter ->
[ unix_error | `Closed | `Timeout | `System_limit ] ->
unit