module Make: functor (Z : Arg) -> sig .. end
functor (
Z
:
Arg
) ->
sig
end
include Z
type logfun = [ `Recv of Recv.t | `Send of Send.t ] -> Remote_name.t -> time_sent_received:Core.Std.Time.t -> unit
[ `Recv of Recv.t | `Send of Send.t ] -> Remote_name.t -> time_sent_received:Core.Std.Time.t -> unit
module Server: sig .. end
module Client: sig .. end