Скачать Обработка исключительных ситуаций в стиле Ada

25.03.1995
Скачать файл (3,02 Кб)

Так как модератор запретил наезды пасквилянтов на си-мэнов и наоборот, наезжаю и на тех и на других сразу : и паскаль и си - хреновые языки, Ada - вот язык профессионалов ! Ho в связи с отсутствием транслятора, приходится пользоваться тем, что есть :(

Тем, кто не боится использовать запрещенные вещи, предлагаю приблизить Pascal к Ada (Любители Си тоже могут воспользоваться этой идеей) : добавить обработку исключительных ситуаций. Исключительная ситуация может возникнуть в любом месте (возбуждение исключительной ситуации), при этом управление передается в последний установленный обработчик. Если он не в состоянии обработать это исключение, то он распространяет его дальше. Hиже привожу модуль и демо к нему (проверено в TP7).