blob: b3aeb3ff07828bdc259eb6f5ae453ab06d2ef5b4 [file] [log] [blame]
package body Generic_Disp_Pkg is
function Constructor (I : not null access Integer) return DT is
R : DT;
begin
return R;
end Constructor;
end Generic_Disp_Pkg;