Module Xml_light.Xml_parser

type token =
  1. | NEXT
  2. | OR
  3. | IDENT of string
  4. | PCDATA
  5. | STAR
  6. | QUESTION
  7. | PLUS
  8. | OPEN
  9. | CLOSE
  10. | END
val dtd_element : (Lexing.lexbuf -> token) -> Lexing.lexbuf -> Types.dtd_child