testsuite/synth/issue1034/p.vhdl


1
2
3
4
5
6
7
8
9
10
11

package p is
	function id(val : natural) return natural;
end package;

package body p is
	function id(val : natural) return natural is
	begin
		return val;
	end function;
end package body;