1
val symbol_start : unit -> int
2
val symbol_end : unit -> int
3
val rhs_start : int -> int
4
val rhs_end : int -> int
5
val symbol_start_pos : unit -> Lexing.position
6
val symbol_end_pos : unit -> Lexing.position
7
val rhs_start_pos : int -> Lexing.position
8
val rhs_end_pos : int -> Lexing.position
9
val clear_parser : unit -> unit
11
val set_trace : bool -> bool
15
actions: (parser_env -> Obj.t) array ;
16
transl_const: int array ;
17
transl_block: int array ;
28
error_function: string -> unit ;
31
exception YYexit of Obj.t
33
parse_tables -> int -> (Lexing.lexbuf -> 'a) -> Lexing.lexbuf -> 'b
34
val peek_val : parser_env -> int -> 'a
35
val is_current_lookahead : 'a -> bool
36
val parse_error : string -> unit