sig type xml_elt val print_list : output:(string -> unit) -> ?encode:(string -> string) -> XML_sigs.SimplePrinter.xml_elt list -> unit end