Opcjonalne wartości domyślne parametrów

Emacs Lisp nie ma wsparcia syntaktycznego dla domyślnych parametrów opcjonalnych innych niż zero. Jaki jest zalecany idiom do dostarczania tych parametrów?

Aby wyjaśnić moją kwestię, oto jeden nadmiernie wyraźny sposób na zrobienie tego.

(defun command (a &optional supplied-b)
  (let ((b (or supplied-b default-b)))
    (command-body a b)))

Jaki jest zalecany styl?

O ile nie używasz rozszerzeń Common Lisp zgodnie z sugestią @legoscia, musisz sprawdzić, czy podano opcjonalny argument. Pamiętaj, że tak naprawdę nie musisz lettutaj używać . Wydaje mi się to bardziej idiomatyczne:

(defun command (a &optional b)
  (or b (setq b default))
  (command-body a b))

Jak sugerowano w komentarzach, użycie unlessmoże być lepsze niż or:

(defun command (a &optional b)
  (unless b (setq b default))
  (command-body a b))

Również z komentarzy: należy zastosować bardziej czysty styl funkcjonalny let, jak w pierwotnym pytaniu, ale nie potrzebujesz osobnych nazw zmiennych:

(defun my-command (a &optional b)
  (let ((b (or b default)))
    (command-body a b)))

Oczywiście, jeśli opcjonalny parametr jest potrzebny tylko raz, powinieneś po prostu to zrobić:

(defun my-command (a &optional b)
    (command-body a (or b default)))

Możesz użyć cl-defun, co pozwala określić wartość domyślną dla opcjonalnych argumentów:

(cl-defun command (a &optional (b default-b))
  (command-body a b))

W tym przypadku wartość domyślna default-bbędzie oceniana przy każdym wywołaniu funkcji.