me
/
guix
Archived
1
0
Fork 0

gnu: eigen: Honor the #:tests? flag.

* gnu/packages/algebra.scm (eigen)[arguments]: Adjust the custom 'check
phase to honor the #:tests? flag.
Efraim Flashner 2022-06-15 21:54:35 +03:00
parent 673983c9c6
commit 0929657ec6
No known key found for this signature in database
GPG Key ID: 41AAE7DCCA3D8351
1 changed files with 10 additions and 9 deletions

View File

@ -4,7 +4,7 @@
;;; Copyright © 2016-2022 Nicolas Goaziou <mail@nicolasgoaziou.fr> ;;; Copyright © 2016-2022 Nicolas Goaziou <mail@nicolasgoaziou.fr>
;;; Copyright © 2014, 2018 Mark H Weaver <mhw@netris.org> ;;; Copyright © 2014, 2018 Mark H Weaver <mhw@netris.org>
;;; Copyright © 2016, 2018, 2019, 2021 Ricardo Wurmus <rekado@elephly.net> ;;; Copyright © 2016, 2018, 2019, 2021 Ricardo Wurmus <rekado@elephly.net>
;;; Copyright © 2017, 2020, 2021 Efraim Flashner <efraim@flashner.co.il> ;;; Copyright © 2017, 2020-2022 Efraim Flashner <efraim@flashner.co.il>
;;; Copyright © 20172021 Tobias Geerinckx-Rice <me@tobias.gr> ;;; Copyright © 20172021 Tobias Geerinckx-Rice <me@tobias.gr>
;;; Copyright © 2017 Marius Bakke <mbakke@fastmail.com> ;;; Copyright © 2017 Marius Bakke <mbakke@fastmail.com>
;;; Copyright © 2017, 2019, 2021, 2022 Eric Bavier <bavier@posteo.net> ;;; Copyright © 2017, 2019, 2021, 2022 Eric Bavier <bavier@posteo.net>
@ -1015,17 +1015,18 @@ extends it by a set of algebraic capabilities.")
#:phases (modify-phases %standard-phases #:phases (modify-phases %standard-phases
(replace 'check (replace 'check
(lambda _ (lambda* (#:key tests? #:allow-other-keys)
(let* ((cores (parallel-job-count)) (let* ((cores (parallel-job-count))
(dash-j (format #f "-j~a" cores))) (dash-j (format #f "-j~a" cores)))
(setenv "EIGEN_SEED" "1") ;for reproducibility (when tests?
;; First build the tests, in parallel. See (setenv "EIGEN_SEED" "1") ;for reproducibility
;; <http://eigen.tuxfamily.org/index.php?title=Tests>. ;; First build the tests, in parallel. See
(invoke "make" "buildtests" dash-j) ;; <http://eigen.tuxfamily.org/index.php?title=Tests>.
(invoke "make" "buildtests" dash-j)
;; Then run 'CTest' with -V so we get more ;; Then run 'CTest' with -V so we get more
;; details upon failure. ;; details upon failure.
(invoke "ctest" "-V" dash-j))))))) (invoke "ctest" "-V" dash-j))))))))
(home-page "https://eigen.tuxfamily.org") (home-page "https://eigen.tuxfamily.org")
(synopsis "C++ template library for linear algebra") (synopsis "C++ template library for linear algebra")
(description (description