type t = [
| Cohttp.Body.t
| `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 of_string : string -> t
val of_string_list : string list -> t
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