Sign in
gnu
/
gcc
/
12a4785c9120beeef42f1bded52cc2674e206f57
/
.
/
gcc
/
testsuite
/
gnat.dg
/
test_nested_subtype_byref.adb
blob: 282aefd1a29dda0baf111f62e7d404c6700dd812 [
file
] [
log
] [
blame
]
--
{
dg
-
do
run
}
--
{
dg
-
options
"-O2"
}
with
Nested_Subtype_Byref
;
procedure
Test_Nested_Subtype_Byref
is
begin
Nested_Subtype_Byref
.
Check
;
end
;