From 202d3be8734343e6e4fb3eafeb5e2521365dd204 Mon Sep 17 00:00:00 2001 From: Andrea Corallo Date: Thu, 10 Feb 2022 09:46:31 +0100 Subject: [PATCH] * lisp/startup.el (normal-top-level): Disable native-comp if not available --- lisp/startup.el | 7 +++++++ 1 file changed, 7 insertions(+) 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"))) -- 2.39.2