Module Approx_lexer
include Approx_tokens
type 'a overflow
=
|
InRange of 'a
|
Overflow of string
type token
=
|
AMPERAMPER
|
AMPERSAND
|
AND
|
AS
|
ASSERT
|
BACKQUOTE
|
BANG
|
BAR
|
BARBAR
|
BARRBRACKET
|
BEGIN
|
CHAR of char overflow
|
CLASS
|
COLON
|
COLONCOLON
|
COLONEQUAL
|
COLONGREATER
|
COMMA
|
COMMENT
|
OCAMLDOC_CODE
|
OCAMLDOC_VERB
|
COMMENTCONT
|
CONSTRAINT
|
DO
|
DONE
|
DOT
|
DOTDOT
|
DOWNTO
|
ELSE
|
END
|
EOF
|
EQUAL
|
EXCEPTION
|
EXTERNAL
|
FALSE
|
FLOAT of string
|
FOR
|
FUN
|
FUNCTION
|
FUNCTOR
|
GREATER
|
GREATERRBRACE
|
GREATERRBRACKET
|
IF
|
ILLEGAL_CHAR of char
|
IN
|
INCLUDE
|
INFIXOP0 of string
|
INFIXOP1 of string
|
INFIXOP2 of string
|
INFIXOP3 of string
|
INFIXOP4 of string
|
INHERIT
|
INITIALIZER
|
INT of int overflow
|
INT32 of int32 overflow
|
INT64 of int64 overflow
|
LABEL of string
|
LAZY
|
LBRACE
|
LBRACELESS
|
LBRACKET
|
LBRACKETBAR
|
LBRACKETLESS
|
LBRACKETGREATER
|
LBRACKETPERCENT
|
LBRACKETPERCENTPERCENT
|
LBRACKETAT
|
LBRACKETATAT
|
LBRACKETATATAT
|
LESS
|
LESSMINUS
|
LET
|
LIDENT of string
|
LINE_DIRECTIVE
|
LPAREN
|
MATCH
|
METHOD
|
MINUS
|
MINUSDOT
|
MINUSGREATER
|
MODULE
|
MUTABLE
|
NATIVEINT of nativeint overflow
|
NEW
|
OBJECT
|
OF
|
OPEN
|
OPTLABEL of string
|
OR
|
PLUS
|
PLUSDOT
|
PREFIXOP of string
|
PRIVATE
|
QUESTION
|
QUESTIONQUESTION
|
QUOTATION of string
|
QUOTE
|
RBRACE
|
RBRACKET
|
REC
|
RPAREN
|
SEMI
|
SEMISEMI
|
SHARP
|
SIG
|
STAR
|
STRING of string
|
STRUCT
|
THEN
|
TILDE
|
TO
|
TRUE
|
TRY
|
TYPE
|
UIDENT of string
|
UNDERSCORE
|
VAL
|
VIRTUAL
|
WHEN
|
WHILE
|
WITH
|
EOL
|
SPACES
val to_string : token -> string
val list_last : 'a list -> 'a
val lines_starts : (int * int) list Stdlib.ref
val keywords : (string * token) list
val keyword_table : (string, token) Stdlib.Hashtbl.t
val lexer_extensions : (Stdlib.Lexing.lexbuf -> Approx_tokens.token) list Stdlib.ref
val enable_extension : string -> unit
val disable_extensions : unit -> unit
val initial_string_buffer : bytes
val string_buff : bytes Stdlib.ref
val string_index : int Stdlib.ref
val reset_string_buffer : unit -> unit
val store_string_char : char -> unit
val get_stored_string : unit -> string
val string_start_loc : int Stdlib.ref
val quotation_start_loc : int Stdlib.ref
val quotation_kind : [ `Camlp4 of string | `Ppx of string ] Stdlib.ref
val comment_stack : in_comment list Stdlib.ref
val entering_inline_code_block : bool Stdlib.ref
val close_comment : unit -> token
val in_comment : unit -> bool
val in_verbatim : unit -> bool
val rewind : Stdlib.Lexing.lexbuf -> int -> unit
val check_commentclose : Stdlib.Lexing.lexbuf -> (string -> 'a) -> 'a
val init : unit -> unit
val char_for_backslash : char -> char
val can_overflow : (string -> 'a) -> Stdlib.Lexing.lexbuf -> 'a overflow
val char_for_decimal_code : int -> string -> char
val char_for_hexadecimal_code : Stdlib.Lexing.lexbuf -> int -> char
val cvt_int_literal : string -> int
val cvt_int32_literal : string -> int32
val cvt_int64_literal : string -> int64
val cvt_nativeint_literal : string -> nativeint
val remove_underscores : string -> string
val update_loc : Stdlib.Lexing.lexbuf -> string option -> int -> bool -> int -> unit
val __ocaml_lex_tables : Stdlib.Lexing.lex_tables
val parse_token : Stdlib.Lexing.lexbuf -> token
val __ocaml_lex_parse_token_rec : Stdlib.Lexing.lexbuf -> int -> token
val quotation : Stdlib.Lexing.lexbuf -> token
val __ocaml_lex_quotation_rec : Stdlib.Lexing.lexbuf -> int -> token
val comment : Stdlib.Lexing.lexbuf -> token
val __ocaml_lex_comment_rec : Stdlib.Lexing.lexbuf -> int -> token
val verbatim : Stdlib.Lexing.lexbuf -> token
val __ocaml_lex_verbatim_rec : Stdlib.Lexing.lexbuf -> int -> token
val string : Stdlib.Lexing.lexbuf -> token
val __ocaml_lex_string_rec : Stdlib.Lexing.lexbuf -> int -> token
val token : Stdlib.Lexing.lexbuf -> token
val token_locs : Stdlib.Lexing.lexbuf -> token * (Stdlib.Lexing.position * Stdlib.Lexing.position)
val token_pos : Stdlib.Lexing.lexbuf -> token * (int * int)
val token_locs_and_comments : Stdlib.Lexing.lexbuf -> token * (Stdlib.Lexing.position * Stdlib.Lexing.position)
val get_token : Stdlib.Lexing.lexbuf -> token
val token_with_comments : Stdlib.Lexing.lexbuf -> token
val token : Stdlib.Lexing.lexbuf -> token
val tokens_of_file : string -> (token * (int * int)) list
val tokens_with_loc_of_string : string -> (token * (int * int)) list
val tokens_of_string : string -> token list
val lines : unit -> (int * int) list