aboutsummaryrefslogtreecommitdiffstats
path: root/testsuite/gna/issue1934/test_pkg.vhdl
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/gna/issue1934/test_pkg.vhdl')
-rw-r--r--testsuite/gna/issue1934/test_pkg.vhdl29
1 files changed, 29 insertions, 0 deletions
diff --git a/testsuite/gna/issue1934/test_pkg.vhdl b/testsuite/gna/issue1934/test_pkg.vhdl
new file mode 100644
index 000000000..a42e53a27
--- /dev/null
+++ b/testsuite/gna/issue1934/test_pkg.vhdl
@@ -0,0 +1,29 @@
+library IEEE;
+use IEEE.std_logic_1164.all;
+use IEEE.numeric_std.all;
+
+package test_pkg is
+
+ type inner_t is record
+ value : unsigned;
+ end record;
+
+ type inner_array_t is array(natural range<>) of inner_t;
+
+ type outer_t is record
+ inner : inner_array_t;
+ end record;
+
+ function fun return outer_t;
+
+end test_pkg;
+
+package body test_pkg is
+
+ function fun return outer_t is
+ variable ret : outer_t(inner(0 to 31)(value(31 downto 0)));
+ begin
+ return ret;
+ end function;
+
+end package body test_pkg;