diff options
Diffstat (limited to 'testsuite/gna/issue332/repro_rec2.vhdl')
-rw-r--r-- | testsuite/gna/issue332/repro_rec2.vhdl | 30 |
1 files changed, 30 insertions, 0 deletions
diff --git a/testsuite/gna/issue332/repro_rec2.vhdl b/testsuite/gna/issue332/repro_rec2.vhdl new file mode 100644 index 000000000..fede4eda5 --- /dev/null +++ b/testsuite/gna/issue332/repro_rec2.vhdl @@ -0,0 +1,30 @@ +entity repro_rec is +end; + +architecture behav of repro_rec is + type my_rec is record + s : natural; + b : bit_vector; + end record; + + signal r : my_rec (b (1 to 3)); + signal a : bit_vector (0 to 1); +begin + process + begin + r.s <= 1; + r.b <= "010"; + wait for 1 ns; + r.b <= "101"; + wait; + end process; + + blk: block + port (r1: my_rec; a1 : bit_vector); + port map (r1 => r, a1 => a); + begin + end block; + +end; + + |