diff options
| author | Tristan Gingold <tgingold@free.fr> | 2021-11-05 19:04:25 +0100 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2021-11-05 19:04:25 +0100 |
| commit | fbd853c88b4b1c3008b1b39882ac2b99b6e59460 (patch) | |
| tree | afa89eedbb1ffda4508ab57e99888f66dc49fc86 /testsuite/gna/issue1908/ini_pkg.vhdl | |
| parent | 68e5a0ad8c2637ea0009057b22fcb883893c6f34 (diff) | |
| download | ghdl-fbd853c88b4b1c3008b1b39882ac2b99b6e59460.tar.gz ghdl-fbd853c88b4b1c3008b1b39882ac2b99b6e59460.tar.bz2 ghdl-fbd853c88b4b1c3008b1b39882ac2b99b6e59460.zip | |
testsuite/gna: add a test for #1908
Diffstat (limited to 'testsuite/gna/issue1908/ini_pkg.vhdl')
| -rw-r--r-- | testsuite/gna/issue1908/ini_pkg.vhdl | 36 |
1 files changed, 36 insertions, 0 deletions
diff --git a/testsuite/gna/issue1908/ini_pkg.vhdl b/testsuite/gna/issue1908/ini_pkg.vhdl new file mode 100644 index 000000000..0ed8d9642 --- /dev/null +++ b/testsuite/gna/issue1908/ini_pkg.vhdl @@ -0,0 +1,36 @@ +LIBRARY IEEE; +USE IEEE.STD_LOGIC_1164.ALL; + +----------------------------------------------------------------------------------- +-- * Package +----------------------------------------------------------------------------------- +package ini_pkg is + ----------------------------------------------------------------------------------- + -- * Types + ----------------------------------------------------------------------------------- + -- With the following values no bug ocurred + type ini_t is record + val_of_0 : std_logic; + val_of_1 : std_logic; + val_of_2 : std_logic; + val_of_3 : std_logic; + val_of_4 : std_logic; + val_of_5 : std_logic; + end record; + + -- With the following values a an exception rise in GHDL, printing the GHDL Bug Ocurred Message + -- type ini_t is record + -- vval_of_0 : std_logic; + -- val_of_1 : std_logic; + -- val_of_2 : std_logic; + -- val_of_3 : std_logic; + -- val_of_4 : std_logic; + -- val_of_5 : std_logic; + -- end record; + + +----------------------------------------------------------------------------------- +-- * End Package +----------------------------------------------------------------------------------- +end package ini_pkg; + |