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;