Mercurial > emacs
changeset 19919:5abc38e45195
(cl-loop-let): Use `last', not `last*'
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 13 Sep 1997 18:49:49 +0000 |
| parents | 7b1e019be521 |
| children | 1d832fd69760 |
| files | lisp/emacs-lisp/cl-macs.el |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emacs-lisp/cl-macs.el Sat Sep 13 18:44:54 1997 +0000 +++ b/lisp/emacs-lisp/cl-macs.el Sat Sep 13 18:49:49 1997 +0000 @@ -1058,7 +1058,7 @@ (let* ((spec (caar specs)) (nspecs nil) (expr (cadr (cl-pop specs))) (temp (cdr (or (assq spec loop-destr-temps) - (car (cl-push (cons spec (or (last* spec 0) + (car (cl-push (cons spec (or (last spec 0) (gensym))) loop-destr-temps)))))) (cl-push (list temp expr) new)