28.5 Conditional throw and checking for catch in the dynamic environment

In some situations it may be useful to check whether there is a specific catch in the dynamic scope, and throw if there is such a catch. The function find-throw-tag and the macro throw-if-tag-found can be used in these circumstances.

LispWorks User Guide and Reference Manual - 13 Feb 2015