podiki pushed a commit to branch mesa-updates
in repository guix.
commit d70f2b788e56545f93dc24238d2617e20fde7460
Author: John Kehayias <[email protected]>
AuthorDate: Sun Nov 5 17:17:02 2023 -0500
gnu: curl: Run tests in parallel.
* gnu/packages/curl.scm (curl)[arguments]: Respect PARALLEL-TESTS? in check
phase, by setting TFLAGS (curl's test flags).
Change-Id: I54dfe32b757824fd3d2b89d10b88315c7e8b8d2a
---
gnu/packages/curl.scm | 17 ++++++++++++-----
1 file changed, 12 insertions(+), 5 deletions(-)
diff --git a/gnu/packages/curl.scm b/gnu/packages/curl.scm
index ea1c2c9924..346bfc4e61 100644
--- a/gnu/packages/curl.scm
+++ b/gnu/packages/curl.scm
@@ -118,15 +118,22 @@
(rename-file (string-append #$output "/share/man/man3")
(string-append #$output:doc "/share/man/man3"))))
(replace 'check
- (lambda* (#:key tests? make-flags #:allow-other-keys)
+ (lambda* (#:key tests? parallel-tests? make-flags
#:allow-other-keys)
(substitute* "tests/runtests.pl"
(("/bin/sh") (which "sh")))
(when tests?
- (let ((arguments `("-C" "tests" "test"
- ,@(if #$(system-hurd?)
+ (let* ((job-count (string-append
+ "-j"
+ (if parallel-tests?
+ (number->string (parallel-job-count))
+ "1")))
+ (arguments `("-C" "tests" "test"
+ ,@make-flags
+ ,(if #$(system-hurd?)
;; protocol FAIL
- (list make-flags "TFLAGS=~1474")
- make-flags))))
+ (string-append "TFLAGS=\"~1474 "
+ job-count "\"")
+ (string-append "TFLAGS="
job-count)))))
;; The top-level "make check" does "make -C tests
quiet-test", which
;; is too quiet. Use the "test" target instead, which is
more
;; verbose.
