* Forward `comp-file-preloaded-p' to async workers

* lisp/emacs-lisp/comp.el (comp-run-async-workers): Forward
`comp-file-preloaded-p' to async workers.
This commit is contained in:
Andrea Corallo 2021-08-27 15:30:20 +02:00
parent a573d6bd88
commit f7da671493

View file

@ -3918,7 +3918,8 @@ display a message."
do (let* ((expr `((require 'comp) do (let* ((expr `((require 'comp)
,(when (boundp 'backtrace-line-length) ,(when (boundp 'backtrace-line-length)
`(setf backtrace-line-length ,backtrace-line-length)) `(setf backtrace-line-length ,backtrace-line-length))
(setf native-compile-target-directory ,native-compile-target-directory (setf comp-file-preloaded-p ,comp-file-preloaded-p
native-compile-target-directory ,native-compile-target-directory
native-comp-speed ,native-comp-speed native-comp-speed ,native-comp-speed
native-comp-debug ,native-comp-debug native-comp-debug ,native-comp-debug
native-comp-verbose ,native-comp-verbose native-comp-verbose ,native-comp-verbose