gcc/testsuite/gnat.dg/inline8_pkg2.ads

package Inline8_Pkg2 is

  generic
    D : Integer;
  function Calc (A : Integer) return Integer;

end Inline8_Pkg2;