Warning: Reason support is experimental. We are looking for beta-tester and contributors.

Functor Xml_print.Make

module Make : functor (Xml : Xml_sigs.Iterable) -> 
  functor (I : sig      val emptytags : string listend) ->
  functor (O : Xml_sigs.Output) ->
  Xml_sigs.Printerwith type out := O.out and type xml_elt := Xml.elt

Parameters :

Xml:Xml_sigs.Iterable
I:sig val emptytags : string list end
O:Xml_sigs.Output

type xml_elt
type out
val print_list : 
  ?encode:(string -> string) ->
  xml_elt list -> out