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

Module type Xml_sigs.Typed_printer

module type Typed_printer = sig..end

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