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