Xml_sigs.Printer
type xml_elt
type out
val print_list : ?encode:(string -> string) -> xml_elt list -> out