[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
04/04: pull: Honor 'parallel-job-count'.
From: |
Ludovic Courtès |
Subject: |
04/04: pull: Honor 'parallel-job-count'. |
Date: |
Sat, 7 Oct 2017 11:08:38 -0400 (EDT) |
civodul pushed a commit to branch master
in repository guix.
commit aba219af0fed6a349af930f19c913fb87e6a69dd
Author: Ludovic Courtès <address@hidden>
Date: Sat Oct 7 16:34:59 2017 +0200
pull: Honor 'parallel-job-count'.
* guix/build/pull.scm (build-guix): Use 'n-par-for-each' and honor
'parallel-job-count'.
---
guix/build/pull.scm | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/guix/build/pull.scm b/guix/build/pull.scm
index 03b0f92..1ae35ab 100644
--- a/guix/build/pull.scm
+++ b/guix/build/pull.scm
@@ -178,7 +178,8 @@ containing the source code. Write any debugging output to
DEBUG-PORT."
;; Make sure compilation related modules are loaded before starting to
;; compile files in parallel.
(compile #f)
- (par-for-each
+ (n-par-for-each
+ (parallel-job-count)
(lambda (file)
(with-mutex mutex
(display #\cr log-port)