1 2 3 4 5 6 7 8 9
-- { dg-compile } -- { dg-options "-O -gnatn" } with Inline21_Q; procedure Inline21 is begin Inline21_Q.My_Nested_G.Proc; end;