Cohttp_async.Body_rawSourceval to_string :
[< `Empty
| `Pipe of Base.String.t Async_kernel.Pipe.Reader.t
| `String of string
| `Strings of string list ] ->
Base.String.t Async_kernel.Deferred.tval to_string_list :
[< `Empty
| `Pipe of string Async_kernel.Pipe.Reader.t
| `String of string
| `Strings of string list ] ->
string list Async_kernel.Deferred.tval drain :
[< `Empty
| `Pipe of 'a Async_kernel.Pipe.Reader.t
| `String of string
| `Strings of string list ] ->
unit Async_kernel.Deferred.tval to_pipe :
[< `Empty
| `Pipe of 'a Async_kernel.Pipe.Reader.t
| `String of 'a
| `Strings of 'a list ] ->
'a Async_kernel.Pipe.Reader.tval disable_chunked_encoding :
[< `Empty
| `Pipe of string Async_kernel.Pipe.Reader.t
| `String of string
| `Strings of string list ] ->
([> B.t ] * int64) Async_kernel.Deferred.tval transfer_encoding :
[< `Empty | `Pipe of 'a | `String of string | `Strings of string list ] ->
Cohttp.Transfer.encodingval map :
[< `Empty
| `Pipe of string Async_kernel.Pipe.Reader.t
| `String of string
| `Strings of string list ] ->
f:(string -> Base.string) ->
tval as_pipe :
[< `Empty
| `Pipe of 'a Async_kernel.Pipe.Reader.t
| `String of 'a
| `Strings of 'a list ] ->
f:('a Async_kernel.Pipe.Reader.t -> 'b) ->
[> `Pipe of 'b ]val to_form :
[< `Empty
| `Pipe of Base.String.t Async_kernel.Pipe.Reader.t
| `String of string
| `Strings of string list ] ->
(string * string list) list Async_kernel.Deferred.tval write_body :
('a -> Base.string -> unit Async_kernel.Deferred.t) ->
t ->
'a ->
unit Async_kernel.Deferred.tval pipe_of_body :
('a -> Cohttp.Transfer.chunk Async_kernel.Deferred.t) ->
'a ->
string Async_kernel.Pipe.Reader.t