chore(early-init): set native compile pattern in early-init.el

This commit is contained in:
Jim Myhrberg
2024-11-21 01:33:27 +00:00
parent 0bb354b89d
commit e0c300cb8d

View File

@@ -16,9 +16,13 @@
;; Prevent native-compiling .dir-locals.el files.
(let ((deny-list '("\\(?:[/\\\\]\\.dir-locals\\.el$\\)")))
(if (boundp 'native-comp-deferred-compilation-deny-list)
(setq native-comp-deferred-compilation-deny-list deny-list)
(setq comp-deferred-compilation-deny-list deny-list)))
(cond
((boundp 'native-comp-jit-compilation-deny-list)
(setq native-comp-jit-compilation-deny-list deny-list))
((boundp 'native-comp-deferred-compilation-deny-list)
(setq native-comp-deferred-compilation-deny-list deny-list))
((boundp 'comp-deferred-compilation-deny-list)
(setq comp-deferred-compilation-deny-list deny-list))))
(when (or (boundp 'comp-eln-load-path) (boundp 'native-comp-eln-load-path))
(let ((eln-cache-dir (expand-file-name "cache/eln-cache/"