Module Xml_light.Xml_lexer

type error =
| EUnterminatedComment
| EUnterminatedString
| EIdentExpected
| ECloseExpected
| ENodeExpected
| EAttributeNameExpected
| EAttributeValueExpected
| EUnterminatedEntity
type dtd_error =
| EInvalidDTDDecl
| EInvalidDTDTag
| EDTDItemExpected
| EInvalidDTDElement
| EInvalidDTDAttribute
exception Error of error
exception DTDError of dtd_error
type dtd_decl =
| DTDFile of string
| DTDData of Dtd0.dtd
type token =
| Tag of string * (string * string) list * bool
| PCData of string
| Endtag of string
| DocType of string * dtd_decl
| Eof
type pos = int * int * int * int
val init : Lexing.lexbuf ‑> unit
val close : Lexing.lexbuf ‑> unit
val token : Lexing.lexbuf ‑> token
val dtd : Lexing.lexbuf ‑> Dtd0.dtd
val pos : Lexing.lexbuf ‑> pos
val restore : pos ‑> unit