1package Noinline2 is
2
3  function F (A, B : Integer) return Integer;
4
5end Noinline2;
6