Анонимные методы баг компилятора

← →
oxffff © (2009-07-02 11:46) [0]

Локализация бага.

procedure TForm2.Button1Click(Sender: TObject);
var idx,b:integer;
actions:array of TProc;
begin
setlength(actions,10);
b:=0;
idx:=0;

while b<10 do
begin
actions[b]:=procedure
begin
showmessage(inttostr(idx));
end;
inc(b);
end;

for idx:=0 to 9 do
begin
actions[idx]();
end;
end;

Вывод 0,1,2,3,4,5,6,7,8,9.

← →
oxffff © (2009-07-02 11:47) [1]

D2009 sp2.

← →
oxffff © (2009-07-02 11:57) [2]

Пардон это мой баг. :)

← →
Компилятор (2009-07-02 12:12) [3]

Вот так всегда - сначала наедут, а потом "ой".

← →
Тимохов_ (2009-07-02 12:13) [4]

Никогда не мог понять, зачем ты пишешь пишешь посты без пояснения что-к-чему. В чем суть? Для этого Quality Central есть и тамошние активисты.

У меня есть ощущение, что здесь такие посты просто не интересны, особенно без рязъяснения, что ты вообще хочешь сказать своим постом.

ну это имхо, сам понимаешь.

← →
oxffff © (2009-07-02 13:06) [5]

> Тимохов_ (02.07.09 12:13) [4]

Приветствую.
Я как раз сам пишу компилятор и решил заюзать анонимные методы для
в своем аналоге LR анализатора.

Но не обратил внимание на сам вывод c использованием IDX.
Просто игнорировал. Невнимательность моя.

>
> for idx:=0 to 9 do
> begin
> actions[idx]();
> end;
> end;

И ко всему прочему здесь есть теги , ну не хочется ломать глаз об ваше одностолбье.

Блин, не пропустил... Теги СОDЕ

Анонимные методы баг компилятора Найти похожие ветки