Module type Async_extra.Versioned_typed_tcp.S

include Arg

module To_server_msg : Datum

module To_client_msg : Datum

module Server_name : Name

module Client_name : Name

module Mode : Mode

type 'a logfun = [ `Recv of 'recv | `Send of 'send ] ‑> 'remote_name ‑> time_sent_received:Core.Time.t ‑> unit constraint 'a = < send : 'send; recv : 'recv; remote_name : 'remote_name; >

module Server : sig ... end

module Client : sig ... end