blob: a1effea3e63807804ce81de5e5c8f2f416ae93ee [file] [log] [blame]
-- { dg-do compile }
with Discr25_Pkg;
procedure Discr25 (N : Natural) is
package Test_Set is new Discr25_Pkg (N);
begin
null;
end;