blob: 9ed220fd10d9974c7d11e2278f23c29fdff7f220 [file] [log] [blame]
package Return4_Pkg is
type Rec is record
I1, I2, I3 : Integer;
end record;
function Get_Value (I : Integer) return Rec;
end Return4_Pkg;