testsuite/gna: add tests for #2350

1 files changed, 26 insertions, 0 deletions

diff --git a/testsuite/gna/issue2350/test.vhdl b/testsuite/gna/issue2350/test.vhdl
new file mode 100644
index 000000000..65df6b825
--- /dev/null
+++ b/testsuite/gna/issue2350/test.vhdl
@@ -0,0 +1,26 @@
+library ieee ;
+    use ieee.std_logic_1164.all ;
+    use ieee.numeric_std.all ;
+
+entity test is
+end entity ;
+
+architecture arch of test is
+
+    type cx_t is record
+        re : signed ;
+        im : signed ;
+    end record ;
+
+    subtype c16_t is cx_t( re(15 downto 0), im(15 downto 0) ) ;
+
+    constant x : c16_t := ( re => to_signed(0, 16), im => to_signed(0, 17) ) ;
+
+begin
+
+    tb : process
+    begin
+        std.env.stop ;
+    end process ;
+
+end architecture ;