pascalabcnet/TestSuite/extensionmethods27.pas
Бондарев Иван 314ae55066 bug fix #735
2018-03-25 18:12:20 +02:00

11 lines
208 B
ObjectPascal

procedure Add<T>(self:List<T>; item: T; b: boolean); extensionmethod;
begin
self.Add(item);
end;
begin
var l: List<integer> := new List<integer>;
l.Add(1, true);
l.Add(6);
assert(l[0] = 1);
end.