(byte-optimize-form-code-walker): Fix previous change.

This commit is contained in:
Richard M. Stallman 1998-01-26 10:29:25 +00:00
parent 713ea1de58
commit b8ba68e52b

View file

@ -511,8 +511,7 @@
;; Support compiler macros as in cl.el. ;; Support compiler macros as in cl.el.
((and (fboundp 'compiler-macroexpand) ((and (fboundp 'compiler-macroexpand)
(not (eq form (not (eq form
(setq form (compiler-macroexpand form (setq form (compiler-macroexpand form)))))
byte-compile-macro-environment)))))
(byte-optimize-form form for-effect)) (byte-optimize-form form for-effect))
((not (symbolp fn)) ((not (symbolp fn))