Вот, кстати, кто там жаловался на скобочки.
Сначала я думал, что unwind-protect это такая фирменная лисповая штука, но чуток подумал и понял, что это всего навсего аналог finally в блоке try/except
По-моему такой способ написания более няшен чем привычный питонячий или жабовый.
Сначала я думал, что unwind-protect это такая фирменная лисповая штука, но чуток подумал и понял, что это всего навсего аналог finally в блоке try/except
По-моему такой способ написания более няшен чем привычный питонячий или жабовый.
(let (resource stream) (unwind-protect (progn (setq resource (allocate-resource) stream (open-file)) (process stream resource)) (when stream (close stream))
;; если была ошибка, то выполняется эта строчка. (when resource (deallocate resource))))