Avril 6 years ago
parent 6f9dbfe2d6
commit d8b6b620cb
Signed by: flanchan
GPG Key ID: 284488987C31F630

@ -44,7 +44,6 @@
(t (c) (cons nil c))))) (t (c) (cons nil c)))))
(values (car ret) (cdr ret)))) (values (car ret) (cdr ret))))
(defmacro try-catch (try &body catch) (defmacro try-catch (try &body catch)
(let ((errnm (gensym))) (let ((errnm (gensym)))
`(let ((,errnm (handler-case (cons ,try nil) `(let ((,errnm (handler-case (cons ,try nil)

Loading…
Cancel
Save