- Код: Выделить всё
program test;
type
TTestType<T> = class
v: T;
public
procedure Proc; virtual; abstract;
procedure ProcT<T2>();
end;
TTestTypeSpec = TTestType<Single>;
procedure TTestType<T>.ProcT<T2>();
begin
end;
begin
end.
- Код: Выделить всё
fpc.exe test.pas -MDelphi -WG -O4
test.pas(8,17) Fatal: Syntax error, ";" expected but "<" found