Commit c01e3aa1 authored by Glenn Morris's avatar Glenn Morris
Browse files

(byte-compile-maybe-guarded): Restore code commented out 2007-11-10.

parent 94dc593f
......@@ -3562,10 +3562,16 @@ that suppresses all warnings during execution of BODY."
;; emacs/xemacs tests have been optimized away, so this is
;; not doing anything useful here, is should probably be
;; moved to a different place.
;; (byte-compile-warnings
;; (if (member ,condition '((featurep 'xemacs)
;; (not (featurep 'emacs))))
;; nil byte-compile-warnings))
;; It is doing _something_. If this is commented out, then
;; compiling a file which requires another file which
;; defines a defsubst that uses (featurep 'xemacs) results
;; in a spurious compilation warning about the xemacs code. Eg:
;; (defsubst foo () (if (featurep 'xemacs) (setq foo t)))
;; where foo is a free variable.
(byte-compile-warnings
(if (member ,condition '((featurep 'xemacs)
(not (featurep 'emacs))))
nil byte-compile-warnings))
)
(unwind-protect
(progn ,@body)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment