Functor XML_print.MakeTypedSimple

module MakeTypedSimple : functor (XML : XML_sigs.Iterable) -> 
  functor (TypedXML : XML_sigs.TypedXML     with  module XML := XML) -> 
  
  XML_sigs.TypedSimplePrinterwith type 'a elt := 'a TypedXML.elt
                                    and type doc := TypedXML.doc

type 'a elt

type doc

val print_list : 
  output:(string -> unit) ->
  ?encode:(string -> string) ->
  'a elt list -> unit

val print : 
  output:(string -> unit) ->
  ?encode:(string -> string) ->
  ?advert:string -> doc -> unit