pascalabcnet/TestSuite/intellisense_tests/extensionmethods7.pas

7 lines
207 B
ObjectPascal
Raw Permalink Normal View History

2018-04-12 21:22:00 +03:00
function f1<T>(self:sequence of T); extensionmethod := self;
begin
Seq(0)
.f1&<integer>.Distinct{@(расширение sequence of T) function Distinct<integer>(): sequence of integer;@};
;
end.