Sign in
gnu
/
gcc
/
a8404c07e7fca388c02c39077865f7d5fa928430
/
.
/
gcc
/
testsuite
/
gnat.dg
/
array2.ads
blob: 323374f09a004bf2a872ac6282cb20dfbadf8dc3 [
file
] [
log
] [
blame
]
package
array2
is
type RIC_TYPE
is
(
RIC1
,
RIC2
);
for
RIC_TYPE
'SIZE use 32;
function MAX return Integer;
end array2;