sig
type input
type dtd = string option
type name = string * string
type attribute = Kwxmlm.Xmlm_type.name * string
type tag = Kwxmlm.Xmlm_type.name * Kwxmlm.Xmlm_type.attribute list
type signal =
[ `Data of string
| `Dtd of Kwxmlm.Xmlm_type.dtd
| `El_end
| `El_start of Kwxmlm.Xmlm_type.tag ]
val input : Kwxmlm.Xmlm_type.input -> Kwxmlm.Xmlm_type.signal
val eoi : Kwxmlm.Xmlm_type.input -> bool
end