Mercurial > emacs
diff lisp/emacs-lisp/cl-macs.el @ 16458:738fe588008a
(lexical-let): Fixed a bug involving nested
lexical contexts and macros.
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Thu, 24 Oct 1996 22:45:24 +0000 |
parents | a74507d555ba |
children | f29538ec7ca1 |
line wrap: on
line diff
--- a/lisp/emacs-lisp/cl-macs.el Thu Oct 24 22:42:29 1996 +0000 +++ b/lisp/emacs-lisp/cl-macs.el Thu Oct 24 22:45:24 1996 +0000 @@ -1294,6 +1294,7 @@ (or (consp x) (setq x (list x))) (cl-push (gensym (format "--%s--" (car x))) cl-closure-vars) + (set (car cl-closure-vars) [bad-lexical-ref]) (list (car x) (cadr x) (car cl-closure-vars)))) bindings)) (ebody