Sourcetype position = Lexing.position = {pos_fname : string;pos_lnum : int;pos_bol : int;pos_cnum : int;
} Sourcetype lexbuf = Lexing.lexbuf = {refill_buff : lexbuf -> unit;mutable lex_buffer : bytes;mutable lex_buffer_len : int;mutable lex_abs_pos : int;mutable lex_start_pos : int;mutable lex_curr_pos : int;mutable lex_last_pos : int;mutable lex_last_action : int;mutable lex_eof_reached : bool;mutable lex_mem : int array;mutable lex_start_p : position;mutable lex_curr_p : position;
}