mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-14 09:39:42 +00:00
Code Issues Releases Activity

* Windows: Use NUMBER_OF_PROCESSORS environment variable.

Browse Source 
* lisp/emacs-lisp/comp.el (comp-effective-async-max-jobs): Use
NUMBER_OF_PROCESSORS environment variable if system is Windows NT,
"nproc" if it is in PATH or a default of 1.
This commit is contained in:
Nicolás Bértolo 2020-05-13 16:22:17 -03:00 committed by Andrea Corallo
parent 60b326ef11
commit d59607b685
1 changed files with 8 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
lisp/emacs-lisp/comp.el
View File

@ -2302,9 +2302,14 @@ processes from `comp-async-compilations'"
(if (zerop comp-async-jobs-number)
(or comp-num-cpus
(setf comp-num-cpus
;; Half of the CPUs or at least one.
;; FIXME portable?
(max 1 (/ (string-to-number (shell-command-to-string "nproc"))
;; FIXME: we already have a function to determine
;; the number of processors, see get_native_system_info in w32.c.
;; The result needs to be exported to Lisp.
(max 1 (/ (cond ((eq 'windows-nt system-type)
(string-to-number (getenv "NUMBER_OF_PROCESSORS")))
((executable-find "nproc")
(string-to-number (shell-command-to-string "nproc")))
(t 1))
2))))
comp-async-jobs-number))