Functor Xml_print.Make
module Make (Xml : Xml_sigs.Iterable)
(I : sig val emptytags : string listend)
(O : Xml_sigs.Output) :
Xml_sigs.Printerwith type out := O.out and type xml_elt := Xml.elt
Parameters :
| Xml | : | Xml_sigs.Iterable | 
| I | : | sig val emptytags : string list end | 
| O | : | Xml_sigs.Output | 
type xml_elt
type out
val print_list :
?encode:(string -> string) ->
xml_elt list -> out