Xml_sigs.Typed_printer
type 'a elt
type doc
type out
val print_list : ?encode:( string -> string ) -> 'a elt list -> out
val print : ?encode:( string -> string ) -> ?advert:string -> doc -> out