fpc/tests/test/tgenfwd12.pp

16 lines
157 B
ObjectPascal

{ %FAIL }
program tgenfwd12;
{$mode objfpc}
type
generic TTest<const N: Integer> = class;
generic TTest<const N: Single> = class
end;
begin
end.