Sign in
gnu
/
gcc
/
a6d3012b274f38b20e2a57162106f625746af6c6
/
.
/
gcc
/
testsuite
/
gnat.dg
/
specs
/
varsize_return2.ads
blob: 1f7d1a0d86039d6e5c736f21c2d3ff1718117c1f [
file
] [
log
] [
blame
]
--
{
dg
-
do
compile
}
--
{
dg
-
options
"-O"
}
with
Varsize_Return2_Pkg
;
use
Varsize_Return2_Pkg
;
package
Varsize_Return2
is
package
My_G
is
new
G
(
0
);
Result
:
constant T
:=
My_G
.
Get
;
end
Varsize_Return2
;