Знак неравенства

[Hershy]

Прикольно, сегодня перепутал и поставил вместо знака ">=" символы "=>", дык Випер мне сообщил следующее:

Runtime error 213 (rtl: выход за границы коллекции)
in strems_.dll at 0002B09D

И, как полагается, вылетает после этого

Такие вот пироги!

Атлантис 5421

Проверили на 5418, компилятор говорит "Ожидался IF или Case" при этом рантайма нет

[larin]

Попробовал в 5.4.21 сделать так:

Код: Выделить всё

interface optest;

create view;

screen sc1;
notablenavigation;
buttons cmAlt1;
<<
  <. dfdfd .>
>>
end;

procedure zzz(par1 : word = 3);
{
  message(string(par1));
}

procedure yyy;
{
  zzz(2);

  if( 2 => 0)
  {
    zzz;
  }
}


handleevent
  cmAlt1: yyy;
end;
end.

Viper при этом не упал.

[larin]

Пришлите ваш пример исходника с ошибочно введенным оператором =>

В при появлении "Runtime error" должен был сформироваться файл AtlError.log в папке запуска випера.
И возможно также создается файл ViperError.log тоже его пришлите.

PS: Кстати такие типичные глюки можете сразу фиксировать в ПИР. Если конечно у вас есть доступ к ПИР.