sig
  type t
  external init : ?address:string -> ?port:string -> unit -> CL_SocketName.t
    = "caml_CL_SocketName_init"
  external copy : sock_name:CL_SocketName.t -> CL_SocketName.t
    = "caml_CL_SocketName_copy"
  external delete : sock_name:CL_SocketName.t -> unit
    = "caml_CL_SocketName_delete"
end