Macro: WHEN-BIND

Source

(defmacro when-bind (var expr &body then)
  `(if-bind ,var ,expr (progn ,@then)))