summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gnat.dg/array2.ads
blob: 323374f09a004bf2a872ac6282cb20dfbadf8dc3 (plain)
1
2
3
4
5
6
7
8
package array2 is
  
  type RIC_TYPE is (RIC1, RIC2);
  for RIC_TYPE'SIZE use 32;
  
  function MAX return Integer;

end array2;