-- { dg-do compile }

with Inline4_Pkg; use Inline4_Pkg;

procedure Inline4 is
begin
  Test (0);
end;