Require target lra in gcc.dg/pr108095.c
[official-gcc.git] / gcc / testsuite / gnat.dg / discr31.adb
blob0fe02cc213126b8bfb9d3d28fbe5197f2ac4c309
1 -- { dg-do compile }
2 -- { dg-options "-O" }
4 package body Discr31 is
6 function Log_Item(Packet : in Packet_Data_Type) return Log_Item_Type is
7 None : Log_Item_Type(0);
8 begin
9 return None;
10 end;
12 end Discr31;