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