Revision a7062da6
Added by LĂ©lio Brun over 3 years ago
src/backends/Horn/horn_backend_common.mli | ||
---|---|---|
1 |
open Utils |
|
2 |
open Format |
|
3 |
open Lustre_types |
|
4 |
open Machine_code_types |
|
5 |
|
|
6 |
val rename_machine_list: ident -> var_decl list -> var_decl list |
|
7 |
val get_machine: machine_t list -> ident -> machine_t |
|
8 |
|
|
9 |
val full_memory_vars: ?without_arrow:bool -> machine_t list -> machine_t -> var_decl list |
|
10 |
|
|
11 |
val rename_machine: ident -> var_decl -> var_decl |
|
12 |
val rename_current: var_decl -> var_decl |
|
13 |
val rename_mid: var_decl -> var_decl |
|
14 |
val rename_next: var_decl -> var_decl |
|
15 |
val rename_current_list: var_decl list -> var_decl list |
|
16 |
val rename_mid_list: var_decl list -> var_decl list |
|
17 |
val rename_next_list: var_decl list -> var_decl list |
|
18 |
|
|
19 |
val concat: string -> ident -> ident |
|
20 |
|
|
21 |
val arrow_vars: machine_t list -> machine_t -> var_decl list |
|
22 |
val reset_vars: machine_t list -> machine_t -> var_decl list |
|
23 |
val step_vars: machine_t list -> machine_t -> var_decl list |
|
24 |
val step_vars_m_x: machine_t list -> machine_t -> var_decl list |
|
25 |
val local_memory_vars: machine_t -> var_decl list |
|
26 |
val inout_vars: machine_t -> var_decl list |
|
27 |
|
|
28 |
val pp_type: formatter -> Types.t -> unit |
|
29 |
val pp_machine_reset_name: formatter -> ident -> unit |
|
30 |
val pp_machine_step_name: formatter -> ident -> unit |
|
31 |
val pp_machine_stateless_name: formatter -> ident -> unit |
|
32 |
val pp_conj: (formatter -> 'a -> unit) -> formatter -> 'a list -> unit |
|
33 |
val pp_decl_var: formatter -> var_decl -> unit |
|
34 |
|
|
35 |
val registered_keywords: ident list |
|
36 |
|
|
37 |
val protect_kwd: ident -> ident |
Also available in: Unified diff
another step towards refactoring