type token = | ATOM of string |
| LIST_OPEN |
| LIST_CLOSE |
| EOI |
exception Error of int * int * string
val error : Stdlib.Lexing.lexbuf -> string -> 'a
type unescape_state = | Not_escaped |
| Escaped |
| Escaped_int_1 of int |
| Escaped_int_2 of int |
val char_equal : char -> char -> boolval remove_quotes : Stdlib.Lexing.lexbuf -> string -> stringval __ocaml_lex_tables : Stdlib.Lexing.lex_tablesval token : Stdlib.Lexing.lexbuf -> tokenval __ocaml_lex_token_rec : Stdlib.Lexing.lexbuf -> int -> token