sig type t = [ `Html ] XHTML.M.elt val result_of_content : t -> Http_frame.result Lwt.t val get_etag : t -> Http_frame.etag option end