Invoking Restarts
(defun abort-if-abortable (value)
(when (find-restart ‘abort)
(invoke-restart ‘abort value)))
This is similar to the lisp function ABORT, except ABORT signals an error if there is no restart named ABORT.
“Simple” restarts are exactly like throw and catch except that you can test for them with FIND-RESTART.