diff options
Diffstat (limited to 'testsuite')
| -rw-r--r-- | testsuite/gna/bug044/aggr2.vhdl | 13 | ||||
| -rwxr-xr-x | testsuite/gna/bug044/testsuite.sh | 1 |
2 files changed, 14 insertions, 0 deletions
diff --git a/testsuite/gna/bug044/aggr2.vhdl b/testsuite/gna/bug044/aggr2.vhdl new file mode 100644 index 000000000..499810996 --- /dev/null +++ b/testsuite/gna/bug044/aggr2.vhdl @@ -0,0 +1,13 @@ +entity aggr2 is +end; + +architecture behav of aggr2 is + constant g : natural := 1; +begin + process + variable v : bit_vector(3 downto 0); + begin + v (g + 2 downto g) := (2 downto 0 => '1'); + wait; + end process; +end; diff --git a/testsuite/gna/bug044/testsuite.sh b/testsuite/gna/bug044/testsuite.sh index 07a290fe5..1097b3a22 100755 --- a/testsuite/gna/bug044/testsuite.sh +++ b/testsuite/gna/bug044/testsuite.sh @@ -3,6 +3,7 @@ . ../../testenv.sh analyze_failure --std=93 aggr1.vhdl +analyze_failure --std=93 aggr2.vhdl clean |