functor (XML : XML_sigs.Iterable) ->
functor
(TypedXML : sig
module Info : XML_sigs.Info
type 'a elt
type doc
val toelt : 'a elt -> XML.elt
val doc_toelt : doc -> XML.elt
end) ->
sig
type t = TypedXML.doc
type options = Http_headers.accept Lazy.t
val result_of_content :
?options:options -> t -> Ocsigen_http_frame.result Lwt.t
val get_etag : ?options:options -> t -> Ocsigen_http_frame.etag option
end