mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-24 21:38:07 -05:00
cuirass: Create just as many threads as needed.
* build-aux/cuirass/evaluate.scm (command-line): Change second argument to 'n-par-for-each'.
This commit is contained in:
parent
98a6642298
commit
d90bd5642a
1 changed files with 2 additions and 1 deletions
|
@ -85,7 +85,8 @@ (define derivation
|
||||||
(open-inferior (derivation->output-path derivation)))
|
(open-inferior (derivation->output-path derivation)))
|
||||||
%cuirass-supported-systems)))
|
%cuirass-supported-systems)))
|
||||||
(n-par-for-each
|
(n-par-for-each
|
||||||
(/ (current-processor-count) 2)
|
(min (length %cuirass-supported-systems)
|
||||||
|
(current-processor-count))
|
||||||
(lambda (system inferior)
|
(lambda (system inferior)
|
||||||
(with-store store
|
(with-store store
|
||||||
(let ((channels (map channel-instance->sexp instances)))
|
(let ((channels (map channel-instance->sexp instances)))
|
||||||
|
|
Loading…
Reference in a new issue