Require target lra in gcc.dg/pr108095.c
[official-gcc.git] / gcc / testsuite / gnat.dg / lto17.adb
blob504fb877a645515851180a04030a3fdbe1fae9ff
1 -- { dg-do compile }
2 -- { dg-options "-flto" { target lto } }
4 package body Lto17 is
6 function To_Chunk_List(C : Chunk) return Chunk_List is
7 begin
8 return new Chunk_List_Element'(C.Size, C, null);
9 end;
11 end Lto17;