blob: b3f18705275d27c196544b55780bad0bb4223924 [file] [log] [blame]
package body Inline7_Pkg2 is
function Calc (A : Integer) return Integer is
begin
return D - A;
end;
end Inline7_Pkg2;