Fix the new pr83361.c testcase
[official-gcc.git] / gcc / testsuite / gnat.dg / specs / array2.ads
blob73d4ea5b9bc38494e01a62a90004bf95c00e89da
1 -- { dg-do compile }
2 -- { dg-options "-gnatws" }
4 pragma Restrictions (No_Elaboration_Code);
6 package Array2 is
8 type Arr is array (Positive range <>) of Boolean;
9 A : Arr (1 .. 2 ** 2);
10 for A'Size use 16#1000_0000_0#;
12 end Array2;