--  { dg-do run }
--  { dg-options "-O -gnatn" }
with Generic_Inst12_Pkg2;
procedure Generic_Inst12 is
  procedure My_Inner_G is new Generic_Inst12_Pkg2.Inner_G;
begin
  My_Inner_G (1);
  Generic_Inst12_Pkg2.Proc (1);
end;
--  { dg-do run }
--  { dg-options "-O -gnatn" }
with Generic_Inst12_Pkg2;
procedure Generic_Inst12 is
  procedure My_Inner_G is new Generic_Inst12_Pkg2.Inner_G;
begin
  My_Inner_G (1);
  Generic_Inst12_Pkg2.Proc (1);
end;