blob: 0393ad2c53c514c6ecd653ac64320c9c1c4e75c8 (
plain)
1
2
3
4
5
6
7
8
9
10
|
package repro is
function f (arg : bit; length : natural) return bit;
end repro;
package body repro is
function f (arg : bit; length : positive) return bit is
begin
return arg;
end;
end repro;
|