sig type t = (unit -> string Ocsistream.t Lwt.t) list * string val result_of_content : t -> Http_frame.result Lwt.t val get_etag : t -> Http_frame.etag option end