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

10 lines
154 B
Ada

with Inline13_Pkg;
package Inline13 is
type Arr is array (Positive range <>) of Inline13_Pkg.T;
function F (L : Arr) return String;
end Inline13;