common-lisp RETURN-FROM，从块或功能退出

示例

功能总是在身体周围建立障碍。该块的名称与函数名称相同。这意味着您可以RETURN-FROM将此块名称与函数一起使用并返回值。

您应该避免尽可能早地返回。

(defun foobar (x y)
  (when (oddp x)
    (format t "X (~d) is odd. Returning immediately.~%" x)
    (return-from foobar "return value"))
  (format t "X: ~s~@
             Y: ~s~%"
          x y))

(foobar 10 20)
; X: 10
; Y: 20
;=> NIL
(foobar 9 20)
; X (9) is odd. Returning immediately.
;=> "return value"