Новое стандартное исключение ExStringOverflow

[Peter]

После перехода на Atlantis 5.3 моя программа стала прерываться по исключению ExStringOverflow. Раньше все работало. В документации описания данного исключения не нашел (документация от 30.01.2008). Есть подозрение, что в 5.3 добавились стандартные исключения, хотелось бы получить их описание (в какой момент возникают, на что влияют).

[cruger]

видимо у вас есть try блок, который на except по else обрабатывает все исключения
обработайте там это исключение, поставив продолжение выполнения, если вас не интересует переполнение строк

[Peter]

Так и сделал. Просто боюсь что еще что-нибудь появится. Был бы полный список исключений, сам решил бы как реагировать на каждое.

[cruger]

вообще полный список есть в документации, которая постепенно пополняется
будет добавлено и это

[mazneff]

появилось исключение ExStringOverflow, срабатывающее при переполнении строки при выполнении операции S := S + xxx.

Пример:
---------------------------------------------

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

interface TheOne22;
create view as select * from x$files;

screen sc;
buttons cmTheButton;

<<
<. Push me .>
>>

end;

var s : string;

    handleevent
        cminit:
        {
            var i : word;
            s := '';
            for (i-=i; ++i < 200;)
               s += i mod 10;
        }

        cmTheButton:
        {
            _try
                s := s + '0123456789';
            _except
                on ExStringOverflow: s := 'overflow';

            message(s);
        };

    end;
end.