blob: 087a9e66d2056c22de4f97a0e93fa040bab82399 [file] [log] [blame]
generic
N : Natural;
package Generic_Inst8_G is
generic
type T is private;
package First is
function Get (Data : T) return T with Inline;
end First;
generic
type T is private;
package Second is
package My_First is new First (T);
end Second;
end Generic_Inst8_G;