mirror of
git://git.sv.gnu.org/emacs.git
synced 2025-12-06 14:30:50 -08:00
* lisp/emacs-lisp/cconv.el (cconv--analyse-function): Improve warning.
This commit is contained in:
parent
63e984f8fd
commit
95888bca5d
2 changed files with 10 additions and 5 deletions
|
|
@ -552,7 +552,8 @@ FORM is the parent form that binds this var."
|
|||
(cond
|
||||
((byte-compile-not-lexical-var-p arg)
|
||||
(byte-compile-log-warning
|
||||
(format "Argument %S is not a lexical variable" arg)))
|
||||
(format "Lexical argument shadows the dynamic variable %S"
|
||||
arg)))
|
||||
((eq ?& (aref (symbol-name arg) 0)) nil) ;Ignore &rest, &optional, ...
|
||||
(t (let ((varstruct (list arg nil nil nil nil)))
|
||||
(cl-pushnew arg byte-compile-lexical-variables)
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue