package Noinline2 is

  function F (A, B : Integer) return Integer;

end Noinline2;