PR debug/66535
[official-gcc.git] / gcc / testsuite / gnat.dg / opt15_pkg.adb
blobebb1d263e81ae39ae6dc11ec72e34042719087ea
1 package body Opt15_Pkg is
3 procedure Trace_Non_Inlined is
4 begin
5 raise Program_Error;
6 end;
8 procedure Trace_Inlined is
9 begin
10 Trace_Non_Inlined;
11 end;
13 end Opt15_Pkg;