fpc/tests/webtbs/tw36388.pp
2019-12-02 22:29:34 +00:00

17 lines
197 B
ObjectPascal

{ %NORUN }
{$mode objfpc}
program tw36388;
uses
SysUtils, FGL;
generic function CopyList<T: TFPSList> (source: T): T;
begin
// Internal error 200204175
result := T.Create;
end;
begin
end.