module Make_simple: functor (Xml : Xml_sigs.Iterable) -> functor (F : sigval emptytags : string listend) -> Xml_sigs.Simple_printer with type xml_elt := Xml.elt
functor (
Xml
:
Xml_sigs.Iterable
) ->
F
sig
val emptytags : string list
string list
end
Xml_sigs.Simple_printer
with type xml_elt := Xml.elt
sig val emptytags : string list end
type xml_elt
val print_list : output:(string -> unit) -> ?encode:(string -> string) -> xml_elt list -> unit
output:(string -> unit) -> ?encode:(string -> string) -> xml_elt list -> unit