gcc/testsuite/gnat.dg/array29.ads

package Array29 is

  type Matrix is array (Integer range <>, Integer range <>) of Long_Float;

  procedure Proc;

end Array29;