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