Corrected date in changelog
[official-gcc.git] / gcc / testsuite / gnat.dg / bad_array.adb
blob5d49f9ba68d741c3f24408423a48630fb16d9f5b
1 -- { dg-do compile }
3 procedure Bad_Array is
4 A1 : array(Character range <> ) of Character := ( 'a', 'b', 'c' );
5 begin
6 null;
7 end Bad_Array;