Module Xml_light.Xml_parser

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