diff options
author | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2019-05-15 13:26:34 +0200 |
---|---|---|
committer | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2019-05-15 13:26:34 +0200 |
commit | 0af2ea25f0df045d6d45ae0487c6d5022490a4c4 (patch) | |
tree | b3d3a334c82192e26f31cf23ee1741e0f5baf9ce /test/monniaux/lustrev4_lv6-en-2cgc_heater_control/lustre_types.h | |
parent | 8a456dbb08948c1c24076cea6b87dc938276263b (diff) | |
download | compcert-kvx-0af2ea25f0df045d6d45ae0487c6d5022490a4c4.tar.gz compcert-kvx-0af2ea25f0df045d6d45ae0487c6d5022490a4c4.zip |
Lustre v4 example
Diffstat (limited to 'test/monniaux/lustrev4_lv6-en-2cgc_heater_control/lustre_types.h')
-rw-r--r-- | test/monniaux/lustrev4_lv6-en-2cgc_heater_control/lustre_types.h | 41 |
1 files changed, 41 insertions, 0 deletions
diff --git a/test/monniaux/lustrev4_lv6-en-2cgc_heater_control/lustre_types.h b/test/monniaux/lustrev4_lv6-en-2cgc_heater_control/lustre_types.h new file mode 100644 index 00000000..7fdfa03e --- /dev/null +++ b/test/monniaux/lustrev4_lv6-en-2cgc_heater_control/lustre_types.h @@ -0,0 +1,41 @@ +/* This file was generated by lv6 version master.737 (2727a7744111c84f7984634d2bd3ad6f7c6c7ff9). */ +/* lv6 -en -2cgc heater_control.lus -n heater_control */ +/* on vanoise the 15/05/2019 at 13:20:10 */ + +#ifndef _SOC2C_PREDEF_TYPES +#define _SOC2C_PREDEF_TYPES +typedef int _boolean; +typedef int _integer; +typedef char* _string; +typedef double _real; +typedef double _double; +typedef float _float; +#define _false 0 +#define _true 1 +#endif +// end of _SOC2C_PREDEF_TYPES +// User typedef +#ifndef _heater_control_heater_control_TYPES +#define _heater_control_heater_control_TYPES +#endif // enf of _heater_control_heater_control_TYPES +// Memoryless soc ctx typedef +// Memoryfull soc ctx typedef +/* Lustre_arrow_ctx */ +typedef struct { + /*Memory cell*/ + _boolean _memory ; +} Lustre_arrow_ctx_type; + +/* Lustre_pre_ctx */ +typedef struct { + /*Memory cell*/ + _boolean _memory ; +} Lustre_pre_ctx_type; + +/* heater_control_heater_control_ctx */ +typedef struct { + /*INSTANCES*/ + Lustre_pre_ctx_type Lustre_pre_ctx_tab[1]; + Lustre_arrow_ctx_type Lustre_arrow_ctx_tab[1]; +} heater_control_heater_control_ctx_type; + |