From f2ece9d895747a95453add597cad3e6d6b1cd2f2 Mon Sep 17 00:00:00 2001 From: Tristan Gingold Date: Sun, 29 Jun 2014 16:39:52 +0200 Subject: Add ticket14. --- testsuite/gna/ticket14/reprook.vhdl | 23 +++++++++++++++++++++++ 1 file changed, 23 insertions(+) create mode 100644 testsuite/gna/ticket14/reprook.vhdl (limited to 'testsuite/gna/ticket14/reprook.vhdl') diff --git a/testsuite/gna/ticket14/reprook.vhdl b/testsuite/gna/ticket14/reprook.vhdl new file mode 100644 index 000000000..0d026a705 --- /dev/null +++ b/testsuite/gna/ticket14/reprook.vhdl @@ -0,0 +1,23 @@ +entity reprook is + generic ( + BUS_WIDTH : integer := 8; + ARRAY_WIDTH : integer := 2); +end entity reprook; + +architecture behavioural of reprook is + + type test_array_btype is array (integer range <>) of + bit_vector (BUS_WIDTH-1 downto 0); + subtype test_array_type is test_array_btype (ARRAY_WIDTH-1 downto 0); + signal s : test_array_type := (others => (others => '0')); + +begin + + failing_process : process + begin + assert s'left = 1; + assert s'right = 0; + wait; + end process failing_process; + +end architecture behavioural; -- cgit v1.2.3