sig val print_list : output:(string -> unit) -> ?encode:(string -> string) -> Ocamlduce.Load.anyxml list -> unit end