hep: pythia: Enable parallel tests.

* guix-science/packages/hep.scm (pythia)
  [arguments]<#:phases>: Use upstream test runner in 'check, evaluate and provide
the number of threads to use.

1 files changed, 13 insertions, 14 deletions

diff --git a/guix-science/packages/hep.scm b/guix-science/packages/hep.scm
index 47a886a..e576d8c 100644
--- a/guix-science/packages/hep.scm
+++ b/guix-science/packages/hep.scm
@@ -932,24 +932,23 @@ HEP packages against.")
           (delete 'check)
 
           (add-after 'install 'check
-            (lambda* (#:key tests? #:allow-other-keys)
+            (lambda* (#:key tests? parallel-tests? #:allow-other-keys)
               (when tests?
                 (let ((examples (string-append #$output
-                                               "/share/Pythia8/examples")))
+                                               "/share/Pythia8/examples"))
+                      (run (string-join (list "101" ;standalone
+                                              "114" ;with yoda
+                                              "131" ;with hepmc3
+                                              "141" ;with root
+                                              "161" ;with fastjet
+                                              ) " "))
+                      (threads (number->string (if parallel-tests?
+                                                   (parallel-job-count) 1))))
                   (copy-recursively examples "examples")
                   (with-directory-excursion "examples"
-                    (for-each (lambda (test)
-                                (invoke "make" test)
-                                (invoke (string-append "./" test)))
-                              (list
-                               ;; standalone
-                               "main101"
-                               ;; with yoda
-                               "main114"
-                               ;; with hepmc3
-                               "main131"
-                               ;; with fastjet and root
-                               "main142"))))))))))
+                    (invoke "./runmains"
+                            (string-append "--threads=" threads)
+                            (string-append "--run='" run "'"))))))))))
     (inputs (list fastjet
                   hepmc3
                   lhapdf