rt_gccstream/gcc/testsuite/gnat.dg/sizetype3_pkg.ads

8 lines
127 B
Ada

package Sizetype3_Pkg is
type List is array (Integer range <>) of Integer;
function F return List;
end Sizetype3_Pkg;