Up

module Cohttp_lwt_body

: sig
#
type t = [
| Cohttp.Body.t
| `Stream of string Lwt_stream.t
]
include Cohttp.S.Body with type t := t
#
val is_empty : t -> bool Lwt.t
#
val to_string : t -> string Lwt.t
#
val to_string_list : t -> string list Lwt.t
#
val to_stream : t -> string Lwt_stream.t
#
val of_stream : string Lwt_stream.t -> t
#
val create_stream : ('a -> Cohttp.Transfer.chunk Lwt.t) -> 'a -> string Lwt_stream.t
#
val length : t -> (int64 * t) Lwt.t
#
val write_body : (string -> unit Lwt.t) -> t -> unit Lwt.t
#
val drain_body : t -> unit Lwt.t
#
val t_of_sexp : Sexplib.Sexp.t -> t
#
val __t_of_sexp__ : Sexplib.Sexp.t -> t
#
val sexp_of_t : t -> Sexplib.Sexp.t
end