1 2 3 4 5 6 7 8 9
-- { dg-do compile } -- { dg-options "-O -gnatn -Winline" } with Inline8_Pkg1; use Inline8_Pkg1; procedure Inline8 is begin Test (0); end;