04/06: gnu: libtool: Honor parallel-tests flag.

[guix-commits]

efraim pushed a commit to branch core-updates
in repository guix.

commit f9eac6a7bc14e03361a27ba56cce9261f6bfa0cf
Author: Efraim Flashner <efraim@flashner.co.il>
AuthorDate: Thu May 26 20:53:02 2022 +0300

    gnu: libtool: Honor parallel-tests flag.
    
    * gnu/packages/autotools.scm (libtool)[arguments]: Adjust custom
    'pre-check phase to honor the parallel-tests? flag.
---
 gnu/packages/autotools.scm | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/gnu/packages/autotools.scm b/gnu/packages/autotools.scm
index a46ac09228..9d4e7718d2 100644
--- a/gnu/packages/autotools.scm
+++ b/gnu/packages/autotools.scm
@@ -485,12 +485,14 @@ Makefile, simplifying the entire process for the 
developer.")
        #:phases
        (modify-phases %standard-phases
          (add-before 'check 'pre-check
-           (lambda* (#:key inputs native-inputs #:allow-other-keys)
+           (lambda* (#:key inputs native-inputs parallel-tests? 
#:allow-other-keys)
              ;; Run the test suite in parallel, if possible.
              (setenv "TESTSUITEFLAGS"
                      (string-append
                       "-j"
-                      (number->string (parallel-job-count))))
+                      (if parallel-tests?
+                        (number->string (parallel-job-count))
+                        "1")))
            ;; Patch references to /bin/sh.
            (let ((bash (assoc-ref (or native-inputs inputs) "bash")))
              (substitute* "tests/testsuite"