Module type Extended.XMLM

type name = string * string
type attribute = name * string
type tag = name * attribute list
type dtd = string option
type signal = [
  1. | `Data of string
  2. | `Dtd of dtd
  3. | `El_end
  4. | `El_start of tag
]
type output
val output : output -> signal -> unit