martin/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

* lisp/loadup.el: Don't load pcase on native builds (bug#47025).

Browse Source
This commit is contained in:
Andrea Corallo
2021-03-10 15:56:05 +01:00
parent fe1c081c38
commit 711b2c8349
1 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
lisp/loadup.el
View File

@@ -157,7 +157,8 @@
;; Load-time macro-expansion can only take effect after setting
;; load-source-file-function because of where it is called in lread.c.
(load "emacs-lisp/macroexp")
(if (byte-code-function-p (symbol-function 'macroexpand-all))
(if (or (byte-code-function-p (symbol-function 'macroexpand-all))
(subr-native-elisp-p (symbol-function 'macroexpand-all)))
nil
;; Since loaddefs is not yet loaded, macroexp's uses of pcase will simply
;; fail until pcase is explicitly loaded. This also means that we have to