mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-07 06:08:22 +02:00

* adjusted error message to reflect that we're not only dealing with generic classes + added test; note: it's added in webtbs, cause the test will loose its %FAIL attribute in the future git-svn-id: trunk@35079 -
20 lines
214 B
ObjectPascal
20 lines
214 B
ObjectPascal
{ %FAIL }
|
|
|
|
program tw31076;
|
|
|
|
{$mode objfpc}
|
|
|
|
type
|
|
generic TFClass<TC> = class
|
|
generic function Res<TF>(): TF; // <<--
|
|
end;
|
|
|
|
generic function TFClass.Res<TF>: TF;
|
|
begin
|
|
|
|
end;
|
|
|
|
begin
|
|
|
|
end.
|