Sign in
gnu
/
gcc
/
refs/tags/basepoints/gcc-13
/
.
/
gcc
/
testsuite
/
gnat.dg
/
aggr9_pkg.ads
blob: c7c7b9e10b8a292994f3e5d7fb9452ef46388b7b [
file
] [
log
] [
blame
]
package
Aggr9_Pkg
is
type
Byte
is
range
0
..
255
;
type R1
is
record
A
,
B
:
Byte
;
end
record
;
type R2
is
record
F
:
R1
;
end
record
;
procedure
Send
(
M
:
R2
);
end
Aggr9_Pkg
;