如何從函數返回

Question

我有這樣的功能。

(defun foo() 
    (if (condition) 
    (do-something))) 

但我想這樣寫，以避免不必要的縮進。

(defun foo() 
    (if not (condition) (return)) 
    (do-something)) 

很明顯return沒有被捕獲，因爲這裏沒有任何塊。

如何退出該功能？ 或者這是一個不好的方式與lisp？

Answer 1

Defun創建一個名爲函數名稱的塊，可以通過調用return-from來使用該塊。

(return-from foo (do-something)) 

這不是一個好的風格，用它來避免一點縮進。您的編輯器應該能夠自動進行縮進，並且功能通常更容易閱讀，而無需提前退貨。

Answer 2

@ m-n已經完全回答了您的問題。我只是想提供什麼「好作風」會是這種情況的一個例子：

(defun foo() 
    (when (condition) 
    (do-something))) 

在我看來，它甚至看起來比

(defun foo() 
    (if (condition) 
     (do-something))) 

，特別是比

(defun foo() 
    (if (not (condition)) (return-from foo)) 
    (do-something)) 

（這是縮進我的emacs的煤泥等產生的話）

NB：與其(when (not (condition)) ...)使用(unless (condition) ...)。