Module Xml_print_duce

module Xml_print_duce: sig .. end

module Make: 
functor (I : sig
val emptytags : string list
end) -> Xml_sigs_duce.Printer 

module Make_typed: 
functor (Typed_xml : Xml_sigs_duce.Typed_xml) -> Xml_sigs_duce.Typed_printer  with module Typed_xml := Typed_xml

val print : output:(string -> unit) ->
       ?encode:(string -> string) -> Ocamlduce.Load.anyxml -> unit