PR target/84336
[official-gcc.git] / gcc / testsuite / gnat.dg / inline13.ads
blob7e8f8d62be1186b522716a6979e0bbfaa29e7f79
1 with Inline13_Pkg;
3 package Inline13 is
5 type Arr is array (Positive range <>) of Inline13_Pkg.T;
7 function F (L : Arr) return String;
9 end Inline13;