From d90bd5642a3663cc7d5124068fadbf8fa28b3207 Mon Sep 17 00:00:00 2001 From: Ludovic Courtès Date: Thu, 26 May 2022 00:17:56 +0200 Subject: cuirass: Create just as many threads as needed. * build-aux/cuirass/evaluate.scm (command-line): Change second argument to 'n-par-for-each'. --- build-aux/cuirass/evaluate.scm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'build-aux') diff --git a/build-aux/cuirass/evaluate.scm b/build-aux/cuirass/evaluate.scm index 5beac1b37c..7ae5c266d1 100644 --- a/build-aux/cuirass/evaluate.scm +++ b/build-aux/cuirass/evaluate.scm @@ -85,7 +85,8 @@ (open-inferior (derivation->output-path derivation))) %cuirass-supported-systems))) (n-par-for-each - (/ (current-processor-count) 2) + (min (length %cuirass-supported-systems) + (current-processor-count)) (lambda (system inferior) (with-store store (let ((channels (map channel-instance->sexp instances))) -- cgit v1.2.3