testsuite/gna/bug029/repro2.vhdl


1
2
3
4
5
6
7
8
9
10
11

package foo is
    function some_foo return integer;
end package;

package body foo is
    function some_foo return integer is
    begin
        return -1;
        return 0;
    end function;
end package body;