Mercurial > emacs
changeset 58490:2176686c8a19
(byte-optimize-form-code-walker):
Use with-no-warnings around compiler-macroexpand.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Thu, 25 Nov 2004 02:58:34 +0000 |
| parents | 5df4ac03694d |
| children | 2a47737d91b0 |
| files | lisp/emacs-lisp/byte-opt.el |
| diffstat | 1 files changed, 2 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emacs-lisp/byte-opt.el Thu Nov 25 02:57:47 2004 +0000 +++ b/lisp/emacs-lisp/byte-opt.el Thu Nov 25 02:58:34 2004 +0000 @@ -520,7 +520,8 @@ (symbolp (car-safe form)) (get (car-safe form) 'cl-compiler-macro) (not (eq form - (setq form (compiler-macroexpand form))))) + (with-no-warnings + (setq form (compiler-macroexpand form)))))) (byte-optimize-form form for-effect)) ((not (symbolp fn))