Thread.Pipemodule Writer : sig ... endmodule Reader : sig ... endval set_size_budget : 'a Writer.t -> int -> unitval flush : 'a Writer.t -> unit Deferred.tval write : 'a Writer.t -> 'a -> unit Deferred.tval write_without_pushback : 'a Writer.t -> 'a -> unitval transfer_in : from:'a Stdlib.Queue.t -> 'a Writer.t -> unit Deferred.tval close : 'a Writer.t -> unit Deferred.tval read : 'a Reader.t -> [ `Eof | `Ok of 'a ] Deferred.tval iter : 'a Reader.t -> f:('a -> unit Deferred.t) -> unit Deferred.tval iter_without_pushback : 'a Reader.t -> f:('a -> unit) -> unit Deferred.tval close_without_pushback : 'a Writer.t -> unit