PR debug/66535
[official-gcc.git] / gcc / testsuite / gnat.dg / inline8_pkg2.adb
blob76017fc2d57bffd531827863ec9a82255b7474ff
1 package body Inline8_Pkg2 is
3 function Calc (A : Integer) return Integer is
4 begin
5 return D - A;
6 end;
8 end Inline8_Pkg2;