PR ipa/83051
[official-gcc.git] / gcc / testsuite / gnat.dg / inline8.adb
blob4e0dec8491860f2106539abd1c8c5609c676abe1
1 -- { dg-do compile }
2 -- { dg-options "-O -gnatn -Winline" }
4 with Inline8_Pkg1; use Inline8_Pkg1;
6 procedure Inline8 is
7 begin
8 Test (0);
9 end;