Module Yaparser


module Yaparser: sig .. end


type token =
| CALL_OF
| RETURN_OF
| CALLORRETURN_OF
| IDENTIFIER of string
| INT of string
| LCURLY
| RCURLY
| LPAREN
| RPAREN
| LSQUARE
| RSQUARE
| RARROW
| TRUE
| FALSE
| FUNC
| NOT
| DOT
| AMP
| COLON
| SEMI_COLON
| COMMA
| PIPE
| EQ
| LT
| GT
| LE
| GE
| NEQ
| PLUS
| MINUS
| SLASH
| STAR
| PERCENT
| OR
| AND
| OTHERWISE
| EOF

type trans =
| Pred of Promelaast.condition
| Otherwise
val observed_states : (string, Promelaast.state) Hashtbl.t
val prefetched_states : (string, string) Hashtbl.t
val observed_vars : (string, string) Hashtbl.t
val observed_funcs : (string, string) Hashtbl.t
val observed_expressions : (string, Cil_types.exp * string * Cil_types.predicate) Hashtbl.t

type observed_expr =
| Func_ret of string
| Func_param of string * string list
| Only_vars
val observed_expr_is_param : observed_expr Pervasives.ref
val ident_count : int Pervasives.ref
val get_fresh_ident : unit -> string
val fetch_and_create_state : string -> Promelaast.state
val prefetch_and_create_state : string -> Promelaast.state
val new_exp : Cil_types.exp_node -> Cil_types.exp
val yytransl_const : int array
val yytransl_block : int array
val yylhs : string
val yylen : string
val yydefred : string
val yydgoto : string
val yysindex : string
val yyrindex : string
val yygindex : string
val yytablesize : int
val yytable : string
val yycheck : string
val yynames_const : string
val yynames_block : string
val yyact : (Parsing.parser_env -> Obj.t) array
val yytables : Parsing.parse_tables
val main : (Lexing.lexbuf -> token) ->
Lexing.lexbuf ->
Promelaast.buchautomata * (string, string) Hashtbl.t *
(string, string) Hashtbl.t