Необов’язкові параметри за замовчуванням

Emacs Lisp не має синтаксичної підтримки для ненульових стандартних параметрів необов'язкових параметрів. Яка рекомендована ідіома для подання цих параметрів?

Щоб уточнити мою думку, ось один із надто явних способів цього зробити.

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

Що, якщо що, є рекомендованим стилем?

Якщо ви не використовуєте поширені розширення Lisp, як запропонував @legoscia, вам потрібно перевірити, чи вказаний необов'язковий аргумент. Зауважте, що вам не потрібно letтут користуватися. Мені це здається ідіоматичнішим:

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

Як запропоновано в коментарях, використання unlessможе бути кращим для or:

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

Також з коментарів: більш чистим функціональним стилем було б користуватися let, як в оригінальному питанні, але вам не потрібні окремі назви змінних:

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

Звичайно, якщо необов'язковий параметр потрібен лише один раз, ви повинні просто зробити це:

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

Ви можете використовувати cl-defun, що дозволяє вказати значення за замовчуванням для необов'язкових аргументів:

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

У цьому випадку значення за замовчуванням default-bбуде оцінюватися кожного разу, коли функція викликається.