pascalabcnet/TestSuite/lambdas_in_generics_1.pas
Бондарев Иван f406dfd173 fix #917
2018-08-10 14:22:52 +02:00

9 lines
217 B
ObjectPascal

function psd<T>(e: IEnumerable<T>): IEnumerable<T>; where T:constructor;
begin
result := e.OrderBy(x -> x);
end;
begin
var ttt := psd(Seq(1,2,4,2,3,5,6));
assert(ttt.SequenceEqual(Seq(1,2,2,3,4,5,6)));
end.