type 'message t
=
|
Need_more_data
Ok of 'message * int
Junk of exn * (int, exn) Core.Result.t
include sig ... end
val sexp_of_t : ('message ‑> Base.Sexp.t) ‑> 'message t ‑> Base.Sexp.t