Xml_print.Make_simple
module Xml : Xml_sigs.Iterable
module I : TagList
val print_list : output:( string -> unit ) -> ?encode:( string -> string ) -> Xml.elt list -> unit