blob: 607cc938991afd24b2e3ecd8429afe59f1afc04e [file] [log] [blame]
package body Limited1_Outer is
function Make_Outer return Outer_Type is
begin
return (What => True, Inner => Make_Inner);
end;
end;