Make_typed (tyxml.Xml_print.Make

Parameters

module Xml : Xml_sigs.Iterable

module Typed_xml : Xml_sigs.Typed_xml with module Xml := Xml

module O : Xml_sigs.Output

val print_list : ?encode:(string -> string) -> 'a Typed_xml.elt list -> O.out

val print : ?encode:(string -> string) -> ?advert:string -> Typed_xml.doc -> O.out