2021-01-06 16:20:07 +03:00
|
|
|
|
uses System, System.Collections.Generic;
|
2015-05-14 22:35:07 +03:00
|
|
|
|
|
|
|
|
|
|
procedure p<X, Y> (b: Func<IEnumerable<Y>, X>; c: Y);
|
|
|
|
|
|
begin
|
2021-01-06 16:20:07 +03:00
|
|
|
|
assert(b.GetType().ToString() = 'System.Func`2[System.Collections.Generic.IEnumerable`1[System.Int32],System.Collections.Generic.IEnumerable`1[System.Int32]]');
|
2015-05-14 22:35:07 +03:00
|
|
|
|
end;
|
|
|
|
|
|
|
|
|
|
|
|
begin
|
|
|
|
|
|
p(x -> x, 5);
|
|
|
|
|
|
end.
|
