Just like when except VAR will be bound to the result of TEST in BODY.
(defmacro when-bind (var test &body body) "Just like when except VAR will be bound to the result of TEST in BODY." `(if-bind ,var ,test (progn ,@body)))