Sign in
gnu
/
gcc
/
a6d3012b274f38b20e2a57162106f625746af6c6
/
.
/
gcc
/
testsuite
/
gnat.dg
/
lto24.adb
blob: 998b44782548429590b8d8c60506de19701781a7 [
file
] [
log
] [
blame
]
--
{
dg
-
do
link
}
--
{
dg
-
options
"-O -g -flto"
{
target lto
}
}
with
Lto24_Pkg1
;
procedure
Lto24
is
R
:
Lto24_Pkg1
.
Rec
(
False
);
begin
R
.
Empty
:=
True
;
end
;