diff options
author | Tristan Gingold <tgingold@free.fr> | 2016-12-08 05:31:45 +0100 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2016-12-08 05:31:45 +0100 |
commit | e7f223da0ad86e2e00074302256aa43b43a83e9c (patch) | |
tree | 1c3eee24d7413e0b962f21d975a771ea4d46ce9b /src/ortho/oread/tests/struct6.on | |
parent | 7b556be5180c421a13e93e24393f3ab77df8f864 (diff) | |
download | ghdl-e7f223da0ad86e2e00074302256aa43b43a83e9c.tar.gz ghdl-e7f223da0ad86e2e00074302256aa43b43a83e9c.tar.bz2 ghdl-e7f223da0ad86e2e00074302256aa43b43a83e9c.zip |
Add tests for oread (some are old)
Diffstat (limited to 'src/ortho/oread/tests/struct6.on')
-rw-r--r-- | src/ortho/oread/tests/struct6.on | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/src/ortho/oread/tests/struct6.on b/src/ortho/oread/tests/struct6.on new file mode 100644 index 000000000..7cb5e4619 --- /dev/null +++ b/src/ortho/oread/tests/struct6.on @@ -0,0 +1,18 @@ +TYPE float IS FLOAT; + +TYPE __ghdl_index_type IS UNSIGNED (32); + +TYPE __ghdl_char IS UNSIGNED (8); + +TYPE struct6 IS RECORD + f : float; + i: __ghdl_char; +END RECORD; + +PUBLIC VAR var1 : struct6; + +TYPE struct6_arr IS ARRAY [__ghdl_index_type] OF struct6; + +TYPE struct6x2 IS SUBARRAY struct6_arr[2]; + +PUBLIC VAR var2 : struct6x2;
\ No newline at end of file |