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 -> bool
val remove_quotes : Stdlib.Lexing.lexbuf -> string -> string
val __ocaml_lex_tables : Stdlib.Lexing.lex_tables
val token : Stdlib.Lexing.lexbuf -> token
val __ocaml_lex_token_rec : Stdlib.Lexing.lexbuf -> int -> token