sig
type t = IPv4 of int32 | IPv6 of int64 * int64
val parse :
string ->
Ocsigen_pervasives.Ip_address.t * Ocsigen_pervasives.Ip_address.t option
val match_ip :
Ocsigen_pervasives.Ip_address.t * Ocsigen_pervasives.Ip_address.t option ->
Ocsigen_pervasives.Ip_address.t -> bool
exception No_such_host
val get_inet_addr : string -> Unix.inet_addr Lwt.t
end