sig
  type tag_t = unit
  type address_t = unit Cf_socket.sockaddr_t
  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