Sign in
gnu
/
gcc
/
a6d3012b274f38b20e2a57162106f625746af6c6
/
.
/
gcc
/
testsuite
/
gnat.dg
/
addr16_pkg.ads
blob: 9a1b9e3b21bd16231960e0cb2947da85a03d6fb5 [
file
] [
log
] [
blame
]
package
Addr16_Pkg
is
type
Arr
is
array
(
Positive
range
<>)
of
Long_Long_Integer
;
type
Rec
(
D
:
Positive
)
is
record
A
:
Arr
(
1
..
D
);
end
record
;
end
Addr16_Pkg
;