gcc/testsuite/gnat.dg/inline4.adb - gcc - Git at Google

 -- { dg-do compile }

 with Inline4_Pkg; use Inline4_Pkg;

 procedure Inline4 is
 begin
   Test (0);
 end;
	-- { dg-do compile }

	with Inline4_Pkg; use Inline4_Pkg;

	procedure Inline4 is
	begin
	Test (0);
	end;