9 lines
141 B
Ada
9 lines
141 B
Ada
|
-- { dg-do compile }
|
||
|
|
|
||
|
|
with Limited2_Pack_2;
|
||
|
|
|
||
|
|
procedure Limited2 is
|
||
|
|
begin
|
||
|
|
Limited2_Pack_2.Create (P => Limited2_Pack_2.C1);
|
||
|
|
end Limited2;
|