diff options
Diffstat (limited to 'testsuite/gna/bug037/repro.vhdl')
-rw-r--r-- | testsuite/gna/bug037/repro.vhdl | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/testsuite/gna/bug037/repro.vhdl b/testsuite/gna/bug037/repro.vhdl index 49e80ddc9..fc0f3e543 100644 --- a/testsuite/gna/bug037/repro.vhdl +++ b/testsuite/gna/bug037/repro.vhdl @@ -3,9 +3,18 @@ end; architecture behav of repro is subtype byte is bit_vector (7 downto 0); - type byte_array is array (1 to 10, boolean, 'a' to 'c') of byte; + type byte_array is array (1 to 2, boolean, 'a' to 'c') of byte; + type bv_array is array (integer range <>) of bit_vector; + + type my_rec is record + s1 : string; + s2 : string; + end record; signal s : byte_array; + signal s2 : bv_array (3 downto 0)(15 downto 0); + signal s3 : my_rec (s1 (1 to 4), s2 (1 to 5)) := (s1 => "hi!!", + s2 => "world"); begin process begin |