Project

General

Profile

Statistics
| Branch: | Tag: | Revision:

lustrec / src / machine_code_common.mli @ 684d39e7

History | View | Annotate | Download (1.87 KB)

1
val pp_val: Machine_code_types.machine_t -> Format.formatter -> Machine_code_types.value_t -> unit
2
val is_memory: Machine_code_types.machine_t -> Lustre_types.var_decl -> bool
3
val is_output: Machine_code_types.machine_t -> Lustre_types.var_decl -> bool
4
val is_const_value: Machine_code_types.value_t -> bool
5
val get_const_assign: Machine_code_types.machine_t -> Lustre_types.var_decl -> Machine_code_types.value_t
6
val get_stateless_status: Machine_code_types.machine_t -> bool * bool
7
val is_stateless: Machine_code_types.machine_t -> bool
8
val mk_val: Machine_code_types.value_t_desc -> Types.type_expr -> Machine_code_types.value_t
9
val mk_conditional: ?lustre_eq:Lustre_types.eq -> Machine_code_types.value_t -> Machine_code_types.instr_t list -> Machine_code_types.instr_t list -> Machine_code_types.instr_t
10
val empty_machine: Machine_code_types.machine_t
11
val arrow_machine: Machine_code_types.machine_t
12
val new_instance: Lustre_types.node_desc -> Lustre_types.top_decl -> Lustre_types.tag -> Lustre_types.ident
13
val value_of_dimension: Machine_code_types.machine_t -> Dimension.dim_expr -> Machine_code_types.value_t
14
val dimension_of_value:Machine_code_types.value_t -> Dimension.dim_expr
15
val pp_instr: Machine_code_types.machine_t -> Format.formatter -> Machine_code_types.instr_t -> unit
16
val pp_instrs: Machine_code_types.machine_t -> Format.formatter -> Machine_code_types.instr_t list -> unit
17
val pp_machines: Format.formatter -> Machine_code_types.machine_t list -> unit
18
val get_machine_opt: Machine_code_types.machine_t list -> string -> Machine_code_types.machine_t option
19

    
20
(* Same function but fails if no such a machine  exists *)
21
val get_machine: Machine_code_types.machine_t list -> string -> Machine_code_types.machine_t
22

    
23
  
24
val get_node_def: string -> Machine_code_types.machine_t -> Lustre_types.node_desc
25
val join_guards_list: Machine_code_types.instr_t list -> Machine_code_types.instr_t list