Mercurial > emacs
diff lisp/emacs-lisp/byte-opt.el @ 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 | 2d6fd1fbee2e |
| children | 9be013ed306d f2ebccfa87d4 |
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))