blob: b05829d0f7be05b667cf61f16dce6ebbf60b54f4 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
-- { dg-do compile }
-- { dg-options "-gnatws" }
with Slice8_Pkg1;
with Slice8_Pkg3;
procedure Slice8 is
package Bp is new Slice8_Pkg3 (Slice8_Pkg1);
begin
null;
end;
|