sig
type 'a engine_state =
[ `Aborted | `Done of 'a | `Error of exn | `Working of int ]
class type ['a] engine =
object
method abort : unit -> unit
method event_system : Unixqueue.event_system
method request_notification : (unit -> bool) -> unit
method state : 'a 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
end
val get_host_by_name :
?resolver:Uq_resolver.resolver -> string -> Unix.host_entry
val current_resolver : unit -> Uq_resolver.resolver
val set_current_resolver : Uq_resolver.resolver -> unit
end
