type error
=
| Illegal_character of char |
| Illegal_escape of string |
| Unterminated_string |
| Keyword_as_label of string |
| Invalid_literal of string |
| Invalid_directive of string * string option |
val initial_string_buffer : bytes
val string_buff : bytes Pervasives.ref
val string_index : int Pervasives.ref
val reset_string_buffer : unit ‑> unit
val store_string_char : char ‑> unit
val store_string : string ‑> unit
val store_lexeme : Lexing.lexbuf ‑> unit
val get_stored_string : unit ‑> string
val is_in_string : bool Pervasives.ref
val in_string : unit ‑> bool
val print_warnings : bool Pervasives.ref
val store_escaped_char : Lexing.lexbuf ‑> char ‑> unit
val char_for_backslash : char ‑> char
val char_for_decimal_code : Lexing.lexbuf ‑> int ‑> char
val char_for_octal_code : Lexing.lexbuf ‑> int ‑> char
val char_for_hexadecimal_code : Lexing.lexbuf ‑> int ‑> char
val get_label_name : Lexing.lexbuf ‑> string
val update_loc : Lexing.lexbuf ‑> string option ‑> int ‑> bool ‑> int ‑> unit
val preprocessor : ((unit ‑> unit) * ((Lexing.lexbuf ‑> Parser.token) ‑> Lexing.lexbuf ‑> Parser.token)) option Pervasives.ref
val escaped_newlines : bool Pervasives.ref
val warn_latin1 : Lexing.lexbuf ‑> unit
val handle_docstrings : bool Pervasives.ref
val report_error : Format.formatter ‑> error ‑> unit
val __ocaml_lex_tables : Lexing.lex_tables
val __ocaml_lex_token_rec : Lexing.lexbuf ‑> int ‑> Parser.token
val string : Lexing.lexbuf ‑> unit
val __ocaml_lex_string_rec : Lexing.lexbuf ‑> int ‑> unit
val quoted_string : string ‑> Lexing.lexbuf ‑> unit
val __ocaml_lex_quoted_string_rec : string ‑> Lexing.lexbuf ‑> int ‑> unit
val skip_hash_bang : Lexing.lexbuf ‑> unit
val __ocaml_lex_skip_hash_bang_rec : Lexing.lexbuf ‑> int ‑> unit
type newline_state
=
| NoLine |
| NewLine |
| BlankLine |