sig
type tag_t = [ `AF_INET ]
type address_t = Cf_ip4_addr.opaque Cf_ip4_addr.t * int
val domain : tag_t Cf_socket.domain_t
val to_sockaddr : address_t -> tag_t Cf_socket.sockaddr_t
val of_sockaddr : tag_t Cf_socket.sockaddr_t -> address_t
val unspecified : tag_t Cf_socket.sockaddr_t
end