sig
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) ->
sig
type elt = Typed_xml.elt
type doc = Typed_xml.doc
val print_list :
output:(string -> unit) ->
?encode:(string -> string) -> elt list -> unit
val print :
output:(string -> unit) ->
?encode:(string -> string) -> ?advert:string -> doc -> unit
end
val print :
output:(string -> unit) ->
?encode:(string -> string) -> Ocamlduce.Load.anyxml -> unit
end