Io.Request
val read : IO.ic -> [ `Eof | `Invalid of string | `Ok of Http.Request.t ] IO.t
val make_body_writer : flush:bool -> Http.Request.t -> IO.oc -> writer
val make_body_reader : Http.Request.t -> IO.ic -> reader
val read_body_chunk : reader -> Cohttp.Transfer.chunk IO.t
val write_header : Http.Request.t -> IO.oc -> unit IO.t
val write :
flush:bool ->
(writer -> unit IO.t) ->
Http.Request.t ->
IO.oc ->
unit IO.t