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