blob: 1e183bec2b83bee38faeb02fcdbc6f89bcd212fa (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
package pkg1 is
generic (type t; c : t);
generic map (t => natural, c => 5);
function f return t;
end pkg1;
package body pkg1 is
function f return t is
begin
return c;
end f;
end pkg1;
entity tb is
end tb;
architecture behav of tb is
begin
assert work.pkg1.f = 5;
end behav;
|
