returned, or the last form in ELSE is returned.
Each element of VARLIST is a list (SYMBOL VALUEFORM) which binds
-SYMBOL to the value of VALUEFORM).
-An element can additionally be of the form (VALUEFORM), which is
-evaluated and checked for nil."
+SYMBOL to the value of VALUEFORM). An element can additionally
+be of the form (VALUEFORM), which is evaluated and checked for
+nil; i.e. SYMBOL can be omitted if only the test result is of
+interest."
(declare (indent 2)
(debug ((&rest [&or symbolp (symbolp form) (sexp)])
form body)))
(if ,(caar (last varlist))
,then
,@else))
- `(let* () ,@else)))
+ `(let* () ,then)))
(defmacro when-let* (varlist &rest body)
"Bind variables according to VARLIST and conditionally eval BODY.