ubuntu-buildroot/output/build/host-gcc-initial-11.4.0/gcc/testsuite/gnat.dg/inline2_pkg.ads

10 lines
202 B
Ada

package Inline2_Pkg is
function Valid_Real (Number : Float) return Boolean;
pragma Inline (Valid_Real);
function Invalid_Real return Float;
pragma Inline (Invalid_Real);
end Inline2_Pkg;