Xml_print.Make_typed
module Xml : Xml_sigs.Iterable
module Typed_xml : Xml_sigs.Typed_xml with module Xml := Xml
module O : Xml_sigs.Output
val print_list : ?encode:(string -> string) -> 'a Typed_xml.elt list -> O.out
val print :
?encode:(string -> string) ->
?advert:string ->
Typed_xml.doc ->
O.out