Http.Body
let read: content_length:int => get_request_body:('a => 'b) => schedule_read:('b => on_eof:(unit => unit) => on_read:(Lwt_bytes.t => off:int => len:int => unit) => unit) => 'a => Lwt.t(string);