val unescaped : string -> stringval count_lines : string -> inttype state_mode = | STATE_TOKEN| STATE_OFFSET| STATE_UNDERSCORE_TOKEN
type lexer_state = {mutable curr_offset : int;offset_stack : int Stack.t;mutable nl_ignore : int;mutable mode : state_mode;
}val __ocaml_lex_tables : Lexing.lex_tables