aboutsummaryrefslogtreecommitdiffstats
path: root/testsuite/gna/issue1934/test_pkg.vhdl
blob: a42e53a27539911d17e63259d375e6daf0785dcf (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
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;