summaryrefslogtreecommitdiff
path: root/lisp/startup.el
diff options
context:
space:
mode:
authorAndrea Corallo <akrl@sdf.org>2022-02-10 09:46:31 +0100
committerAndrea Corallo <akrl@sdf.org>2022-02-10 14:26:29 +0100
commit202d3be8734343e6e4fb3eafeb5e2521365dd204 (patch)
tree2742a289b878199e963b56ae2baad9bed8a79eda /lisp/startup.el
parent69e82968d7c2b64710f6f6b79597ac98c82449e7 (diff)
downloademacs-202d3be8734343e6e4fb3eafeb5e2521365dd204.tar.gz
emacs-202d3be8734343e6e4fb3eafeb5e2521365dd204.tar.bz2
emacs-202d3be8734343e6e4fb3eafeb5e2521365dd204.zip
* lisp/startup.el (normal-top-level): Disable native-comp if not available
Diffstat (limited to 'lisp/startup.el')
-rw-r--r--lisp/startup.el7
1 files changed, 7 insertions, 0 deletions
diff --git a/lisp/startup.el b/lisp/startup.el
index 71e492e3b4a..59fe5428b7e 100644
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -537,6 +537,13 @@ It is the default value of the variable `top-level'."
(setq user-emacs-directory
(startup--xdg-or-homedot startup--xdg-config-home-emacs nil))
+ (unless (native-comp-available-p)
+ ;; Disable deferred async compilation and trampoline synthesis
+ ;; in this session. This is necessary if libgccjit is not
+ ;; available on MS-Windows.
+ (setq native-comp-deferred-compilation nil
+ comp-enable-subr-trampolines nil))
+
(when (featurep 'native-compile)
;; Form `native-comp-eln-load-path'.
(let ((path-env (getenv "EMACSNATIVELOADPATH")))