fpc/tests/webtbs/tw30530.pp

19 lines
319 B
ObjectPascal

unit tw30530;
{$mode objfpc}{$H+}
interface
uses
{Classes, SysUtils, }Generics.Collections;
type
//generic TMyList<T> = class(specialize TObjectList<T>);
generic TMyList<T: class> = class(specialize TObjectList<T>);
//generic TMyList<T: class> = class(specialize TObjectList<T>) end;
implementation
end.