Functor Xml_print.Make

module Make (Xml : Xml_sigs.Iterable)  (I : TagList)  (O : Xml_sigs.Output) : Xml_sigs.Printer  with type out := O.out and type xml_elt := Xml.elt

type xml_elt 

type out 

val print_list : ?encode:(string -> string) ->
       xml_elt list -> out