* lisp/emacs-lisp/byte-opt.el (featurep): Move compiler-macro...
* lisp/emacs-lisp/bytecomp.el (featurep): ...here. Fixes: debbugs:11692
This commit is contained in:
parent
a12ac9d795
commit
c4c8444a78
3 changed files with 13 additions and 10 deletions
|
@ -4539,6 +4539,16 @@ and corresponding effects."
|
|||
(setq command-line-args-left (cdr command-line-args-left)))
|
||||
(kill-emacs 0))
|
||||
|
||||
;;; Core compiler macros.
|
||||
|
||||
(put 'featurep 'compiler-macro
|
||||
(lambda (form feature &rest _ignore)
|
||||
;; Emacs-21's byte-code doesn't run under XEmacs or SXEmacs anyway, so
|
||||
;; we can safely optimize away this test.
|
||||
(if (member feature '('xemacs 'sxemacs 'emacs))
|
||||
(eval form)
|
||||
form)))
|
||||
|
||||
(provide 'byte-compile)
|
||||
(provide 'bytecomp)
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue