type t
=
{
message_length : int;
message_type : char;
}
include sig ... end
val t_of_sexp : Base.Sexp.t ‑> t
val sexp_of_t : t ‑> Base.Sexp.t
val num_bytes : t ‑> int
val write : t ‑> (Core.read_write, _) Core.Iobuf.t ‑> int