Session.Fd
type t = Async.Reader.t * Async.Writer.t
val read : t -> bytes -> [ `Ok of int | `Eof ] Async.Deferred.Or_error.t
val write_full : t -> string -> unit Async.Deferred.Or_error.t