diff options
author | Andrea Corallo <akrl@sdf.org> | 2023-02-13 16:40:02 +0100 |
---|---|---|
committer | Andrea Corallo <akrl@sdf.org> | 2023-02-13 17:06:13 +0100 |
commit | 95692f6754c3a8f55a90df2d6f7ce62be55cdcfc (patch) | |
tree | eea090d3cc11fc067545b059bfe9176b22bf4a6b /lisp | |
parent | 8d8464bd5a98598e7a6fe63370545c7f07574926 (diff) | |
download | emacs-95692f6754c3a8f55a90df2d6f7ce62be55cdcfc.tar.gz emacs-95692f6754c3a8f55a90df2d6f7ce62be55cdcfc.tar.bz2 emacs-95692f6754c3a8f55a90df2d6f7ce62be55cdcfc.zip |
Rename native-comp-deferred-compilation-deny-list
* lisp/emacs-lisp/comp.el (native-comp-jit-compilation-deny-list)
(native-compile-async-skip-p): Rename
native-comp-deferred-compilation-deny-list into
native-comp-jit-compilation-deny-list.
(native-comp-deferred-compilation-deny-list): Mark it obsolete.
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/emacs-lisp/comp.el | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el index fc1862a45e8..ed706feb923 100644 --- a/lisp/emacs-lisp/comp.el +++ b/lisp/emacs-lisp/comp.el @@ -85,13 +85,17 @@ This is intended for debugging the compiler itself. :type 'boolean :version "28.1") -(defcustom native-comp-deferred-compilation-deny-list +(defcustom native-comp-jit-compilation-deny-list '() "List of regexps to exclude matching files from deferred native compilation. Files whose names match any regexp are excluded from native compilation." :type '(repeat regexp) :version "28.1") +(make-obsolete-variable 'native-comp-deferred-compilation-deny-list + 'native-comp-jit-compilation-deny-list + "29.1") + (defcustom native-comp-bootstrap-deny-list '() "List of regexps to exclude files from native compilation during bootstrap. @@ -4144,11 +4148,11 @@ LOAD and SELECTOR work as described in `native--compile-async'." (t (error "SELECTOR must be a function a regexp or nil"))) ;; Also exclude files from deferred compilation if ;; any of the regexps in - ;; `native-comp-deferred-compilation-deny-list' matches. + ;; `native-comp-jit-compilation-deny-list' matches. (and (eq load 'late) (cl-some (lambda (re) (string-match-p re file)) - native-comp-deferred-compilation-deny-list)))) + native-comp-jit-compilation-deny-list)))) (defun native--compile-async (files &optional recursively load selector) ;; BEWARE, this function is also called directly from C. |