; * lisp/startup.el (normal-top-level): Fix byte-compilation warning.

This commit is contained in:
Eli Zaretskii 2022-02-10 19:05:41 +02:00
parent 202d3be873
commit c30106ce9f

View file

@ -520,6 +520,9 @@ DIRS are relative."
(t emacs-d-dir))))
(defvar native-comp-eln-load-path)
(defvar native-comp-deferred-compilation)
(defvar comp-enable-subr-trampolines)
(defun normal-top-level ()
"Emacs calls this function when it first starts up.
It sets `command-line-processed', processes the command-line,
@ -540,7 +543,8 @@ It is the default value of the variable `top-level'."
(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.
;; available on MS-Windows, but Emacs was built with
;; native-compilation support.
(setq native-comp-deferred-compilation nil
comp-enable-subr-trampolines nil))