`sig
type 't engine_state =
[ `Aborted | `Done of 't | `Error of exn | `Working of int ]
class type ['t] engine =
object
method abort : unit -> unit
method event_system : Unixqueue.event_system
method request_notification : (unit -> bool) -> unit
method request_proxy_notification :
('t Uq_resolver.engine -> bool) -> unit
method state : 't Uq_resolver.engine_state
end
exception Host_not_found of string
class type resolver =
object
method host_by_name :
string ->
Unixqueue.event_system -> Unix.host_entry Uq_resolver.engine
method ipv6 : bool
end
val get_host_by_name :
?resolver:Uq_resolver.resolver -> string -> Unix.host_entry
val sockaddr_of_socksymbol :
?resolver:Uq_resolver.resolver -> Netsockaddr.socksymbol -> Unix.sockaddr
val default_resolver : unit -> Uq_resolver.resolver
val gai_resolver : ?ipv4:bool -> ?ipv6:bool -> unit -> Uq_resolver.resolver
val current_resolver : unit -> Uq_resolver.resolver
val set_current_resolver : Uq_resolver.resolver -> unit
end`