val next_read_operation : t -> [ `Read | `Yield | `Close | `Upgrade ]val read : t -> Bstr.t -> off:int -> len:int -> intval read_eof : t -> Bstr.t -> off:int -> len:int -> intval yield_reader : t -> (unit -> unit) -> unitval next_write_operation :
t ->
[ `Write of Bstr.t Faraday.iovec list | `Close of int | `Yield | `Upgrade ]val report_write_result : t -> [ `Ok of int | `Closed ] -> unitval yield_writer : t -> (unit -> unit) -> unitval report_exn : t -> exn -> unitval is_closed : t -> bool