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