-- { dg-do compile }
-- { dg-options "-gnatN" }
with Elab8_Gen;
procedure Elab8 is
package My_G is new Elab8_Gen (Integer);
begin
My_G.Compare (0, 1);
end;