ea669a4c4f
LifeWPF в примерах с сверхбыстрой графикой Убрал с toolbar AutoInsertCode Freeze для GetBrush
9 lines
158 B
ObjectPascal
9 lines
158 B
ObjectPascal
begin
|
|
var l := Lst(0);
|
|
foreach var x in |0,1,5| index i do
|
|
begin
|
|
loop 2 do
|
|
l += i
|
|
end;
|
|
Assert(l.SequenceEqual(|0,0,0,1,1,2,2|));
|
|
end. |