PR target/84336

[official-gcc.git] / gcc / testsuite / gnat.dg / inline8_pkg2.adb

package body Inline8_Pkg2 is

  function Calc (A : Integer) return Integer is
  begin
    return D - A;
  end;

end Inline8_Pkg2;