blob: 1c9a979bbbea92672e7023f0e9d649e367ae84e9 (
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
|
package n is
function t return n;
end;
package body n is
function get return l is
begin
end get;
end;
package n is
generic(package g is new w generic map(<>));
function t return l;
end;
package body gen0 is
use p;
function g return l is
begin
end;
end gen0;
package b is
end;
architecture beha0 of b is
begin
end beha0;
|