Socket (hvsock.Hvsock

module Make
  (Fn : S.FN)
  (Socket_family : Hvsock.Af_common.S) : 
  S.SOCKET
    with type sockaddr = Socket_family.sockaddr
     and type fd = Socket_family.t

Create a Lwt socket from a