pascalabcnet/TestSuite/lam3_captureparam.pas
Mikhalkovich Stanislav ee27ca7136 fix #2365
2021-01-28 16:12:00 +03:00

5 lines
141 B
ObjectPascal

begin
var b := Arr(0, 1);
Assert(b.SelectMany(x -> b.SelectMany(y -> b.Select(z -> y).Select(w -> 1))).SequenceEqual(Arr(1)*8));
end.