* gcc-interface/trans.c (node_has_volatile_full_access) <N_Identifier>:

[official-gcc.git] / gcc / testsuite / gnat.dg / lto13.adb

-- { dg-do link }
-- { dg-options "-g -flto" { target lto } }

with Lto13_Pkg; use Lto13_Pkg;

procedure Lto13 is
begin
  Proc;
end;