testsuite/gna: add a test for #1657

1 files changed, 26 insertions, 0 deletions

diff --git a/testsuite/gna/issue1657/test_entity.vhdl b/testsuite/gna/issue1657/test_entity.vhdl
new file mode 100644
index 000000000..96f0dc58d
--- /dev/null
+++ b/testsuite/gna/issue1657/test_entity.vhdl
@@ -0,0 +1,26 @@
+library ieee;
+use ieee.std_logic_1164.all;
+use std.env.finish;
+
+
+entity test is
+end entity test;
+
+architecture rtl of test is
+    
+    type std_logic_vector_array is array(natural range <>) of std_logic_vector;
+    signal test_sig : std_logic_vector_array(0 to 3)(7 downto 0) := (others => (others => '0'));
+
+begin
+    
+    Test_Proc: process
+    begin
+        for i in 0 to 15 loop
+            test_sig <= test_sig(1 to 3) & std_logic_vector'(x"FF");
+            wait for 1 us;
+            report "TESTING" severity note;
+        end loop;    
+        finish;
+    end process;
+
+end architecture rtl;
\ No newline at end of file