2016-01-15 Vladimir Makarov <vmakarov@redhat.com>

[official-gcc.git] / gcc / testsuite / gnat.dg / aggr14_pkg.ads

package Aggr14_Pkg is

  type A is array (Integer range 1 .. 3) of Short_Short_Integer;

   X : A := (1, 2, 3);

  procedure Proc;

end Aggr14_Pkg;