diff options
| author | Andrea Corallo | 2023-02-13 16:40:02 +0100 |
|---|---|---|
| committer | Andrea Corallo | 2023-02-13 17:06:13 +0100 |
| commit | 95692f6754c3a8f55a90df2d6f7ce62be55cdcfc (patch) | |
| tree | eea090d3cc11fc067545b059bfe9176b22bf4a6b | |
| parent | 8d8464bd5a98598e7a6fe63370545c7f07574926 (diff) | |
| download | emacs-95692f6754c3a8f55a90df2d6f7ce62be55cdcfc.tar.gz 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.
| -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. | |||
| 85 | :type 'boolean | 85 | :type 'boolean |
| 86 | :version "28.1") | 86 | :version "28.1") |
| 87 | 87 | ||
| 88 | (defcustom native-comp-deferred-compilation-deny-list | 88 | (defcustom native-comp-jit-compilation-deny-list |
| 89 | '() | 89 | '() |
| 90 | "List of regexps to exclude matching files from deferred native compilation. | 90 | "List of regexps to exclude matching files from deferred native compilation. |
| 91 | Files whose names match any regexp are excluded from native compilation." | 91 | Files whose names match any regexp are excluded from native compilation." |
| 92 | :type '(repeat regexp) | 92 | :type '(repeat regexp) |
| 93 | :version "28.1") | 93 | :version "28.1") |
| 94 | 94 | ||
| 95 | (make-obsolete-variable 'native-comp-deferred-compilation-deny-list | ||
| 96 | 'native-comp-jit-compilation-deny-list | ||
| 97 | "29.1") | ||
| 98 | |||
| 95 | (defcustom native-comp-bootstrap-deny-list | 99 | (defcustom native-comp-bootstrap-deny-list |
| 96 | '() | 100 | '() |
| 97 | "List of regexps to exclude files from native compilation during bootstrap. | 101 | "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'." | |||
| 4144 | (t (error "SELECTOR must be a function a regexp or nil"))) | 4148 | (t (error "SELECTOR must be a function a regexp or nil"))) |
| 4145 | ;; Also exclude files from deferred compilation if | 4149 | ;; Also exclude files from deferred compilation if |
| 4146 | ;; any of the regexps in | 4150 | ;; any of the regexps in |
| 4147 | ;; `native-comp-deferred-compilation-deny-list' matches. | 4151 | ;; `native-comp-jit-compilation-deny-list' matches. |
| 4148 | (and (eq load 'late) | 4152 | (and (eq load 'late) |
| 4149 | (cl-some (lambda (re) | 4153 | (cl-some (lambda (re) |
| 4150 | (string-match-p re file)) | 4154 | (string-match-p re file)) |
| 4151 | native-comp-deferred-compilation-deny-list)))) | 4155 | native-comp-jit-compilation-deny-list)))) |
| 4152 | 4156 | ||
| 4153 | (defun native--compile-async (files &optional recursively load selector) | 4157 | (defun native--compile-async (files &optional recursively load selector) |
| 4154 | ;; BEWARE, this function is also called directly from C. | 4158 | ;; BEWARE, this function is also called directly from C. |