diff --git a/src/cmp/cmpexit.lsp b/src/cmp/cmpexit.lsp index 4ecd87559..e0699aaea 100644 --- a/src/cmp/cmpexit.lsp +++ b/src/cmp/cmpexit.lsp @@ -25,7 +25,6 @@ (defun unwind-exit (loc &optional (jump-p nil) &aux (bds-lcl nil) (bds-bind 0) (stack-pop nil)) (declare (fixnum bds-bind)) - (when (consp *destination*) (case (car *destination*) (JUMP-TRUE