Module Xml_light.Xml_parser

type token =
| NEXT
| OR
| IDENT of string
| PCDATA
| STAR
| QUESTION
| PLUS
| OPEN
| CLOSE
| END
val dtd_element : (Lexing.lexbuf ‑> token) ‑> Lexing.lexbuf ‑> Types.dtd_child