aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorAndrea Corallo2022-02-11 15:19:56 +0100
committerAndrea Corallo2022-02-11 15:21:47 +0100
commitefaa0ebca9ec445329643fea2f9fe883d7ccdc3a (patch)
treebbb3cca93bb18d068a9cf7150bad67271bb140ba
parentc30106ce9f713edea173cbb301747cbbe3766257 (diff)
downloademacs-efaa0ebca9ec445329643fea2f9fe883d7ccdc3a.tar.gz
emacs-efaa0ebca9ec445329643fea2f9fe883d7ccdc3a.zip
* lisp/startup.el (normal-top-level): Small code move, improve 202d3be873.
-rw-r--r--lisp/startup.el16
1 files changed, 8 insertions, 8 deletions
diff --git a/lisp/startup.el b/lisp/startup.el
index d369f3ef84e..9ebd4c1a707 100644
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -540,15 +540,15 @@ It is the default value of the variable `top-level'."
540 (setq user-emacs-directory 540 (setq user-emacs-directory
541 (startup--xdg-or-homedot startup--xdg-config-home-emacs nil)) 541 (startup--xdg-or-homedot startup--xdg-config-home-emacs nil))
542 542
543 (unless (native-comp-available-p)
544 ;; Disable deferred async compilation and trampoline synthesis
545 ;; in this session. This is necessary if libgccjit is not
546 ;; available on MS-Windows, but Emacs was built with
547 ;; native-compilation support.
548 (setq native-comp-deferred-compilation nil
549 comp-enable-subr-trampolines nil))
550
551 (when (featurep 'native-compile) 543 (when (featurep 'native-compile)
544 (unless (native-comp-available-p)
545 ;; Disable deferred async compilation and trampoline synthesis
546 ;; in this session. This is necessary if libgccjit is not
547 ;; available on MS-Windows, but Emacs was built with
548 ;; native-compilation support.
549 (setq native-comp-deferred-compilation nil
550 comp-enable-subr-trampolines nil))
551
552 ;; Form `native-comp-eln-load-path'. 552 ;; Form `native-comp-eln-load-path'.
553 (let ((path-env (getenv "EMACSNATIVELOADPATH"))) 553 (let ((path-env (getenv "EMACSNATIVELOADPATH")))
554 (when path-env 554 (when path-env