mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-08 02:07:53 +02:00
21 lines
276 B
ObjectPascal
21 lines
276 B
ObjectPascal
program tw15683;
|
|
|
|
{$mode objfpc}
|
|
|
|
type
|
|
generic GSomething<TSomeType> = class
|
|
procedure Method(i :Integer);
|
|
procedure Method(s :TSomeType);
|
|
end;
|
|
|
|
procedure GSomething.Method(i: Integer);
|
|
begin
|
|
end;
|
|
|
|
procedure GSomething.Method(s: TSomeType);
|
|
begin
|
|
end;
|
|
|
|
begin
|
|
end.
|