fpc/tests/test/tgeneric13.pp
2006-12-30 21:51:24 +00:00

9 lines
149 B
ObjectPascal

{ %fail }
{$mode objfpc}
type generic TListNode<_T> = class(TObject)
Data: _T;
end;
type t = specialize TListNode<TListNode>;
begin
end.