Module Cohttp_async.Body

type t = [
  1. | Cohttp.Body.t
  2. | `Pipe of Base.string Async_kernel.Pipe.Reader.t
]
val sexp_of_t : t -> Sexplib0.Sexp.t
include Cohttp.S.Body with type t := t
val empty : t
val of_string : string -> t
val of_string_list : string list -> t
val of_form : ?scheme:string -> (string * string list) list -> t
val transfer_encoding : t -> Cohttp.Transfer.encoding
val drain : t -> Base.unit Async_kernel.Deferred.t
val is_empty : t -> Base.bool Async_kernel.Deferred.t
val to_string : t -> Base.string Async_kernel.Deferred.t
val to_string_list : t -> Base.string Base.list Async_kernel.Deferred.t
val to_pipe : t -> Base.string Async_kernel.Pipe.Reader.t
val of_pipe : Base.string Async_kernel.Pipe.Reader.t -> t
val map : t -> f:(Base.string -> Base.string) -> t
val as_pipe : t -> f: (Base.string Async_kernel.Pipe.Reader.t -> Base.string Async_kernel.Pipe.Reader.t) -> t
val to_form : t -> (Base.string * Base.string Base.list) Base.list Async_kernel.Deferred.t
module Private : sig ... end