type 'a message_handler
= Core_kernel.Bigstring.t ‑> pos:int ‑> len:int ‑> 'a
module Handler_result : sig ... end
module type Reader : sig ... end
module Send_result : sig ... end
module type Writer : sig ... end