Введение в программирование на Лиспе



             

Пример 9.3


(Defun super () ; Внешний уровень – обработчик внутренних событий (catch 'abort ; Имя обрабатваемого внутреннего события (sub) ; Вызов формы, в которой возможно данное событие (print "It is impossible") ; Реакция на событие ) ) (Defun sub () ; Внутренний уровень (throw 'abort 99) ; Вызов события ) (super) ; Вызов формы, контролирующей внутренние события.

Пример 9.3. Обработка событий при взаимодействии функций

Закрыть окно






Содержание  Назад  Вперед