Sign in
gnu
/
gcc
/
a6d3012b274f38b20e2a57162106f625746af6c6
/
.
/
gcc
/
testsuite
/
gnat.dg
/
aggr24_pkg.ads
blob: 5918f5e8bd4d7d1e7e29d7dac70cc2220402be70 [
file
] [
log
] [
blame
]
package
Aggr24_Pkg
is
type
Rec
is
record
I1
:
Integer
;
I2
:
Integer
;
I3
:
Integer
;
I4
:
Integer
;
I5
:
Integer
;
I6
:
Integer
;
I7
:
Integer
;
S
:
String
(
1
..
5
);
end
record
;
procedure
Init
(
R
:
out
Rec
);
end
Aggr24_Pkg
;