guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

01/01: gnu: eigen: Really run tests in verbose mode.


From: Ludovic Courtès
Subject: 01/01: gnu: eigen: Really run tests in verbose mode.
Date: Fri, 27 Nov 2015 10:04:25 +0000

civodul pushed a commit to branch master
in repository guix.

commit ef8742ea69b8998320d4815e2d9820432852517d
Author: Ludovic Courtès <address@hidden>
Date:   Fri Nov 27 10:59:56 2015 +0100

    gnu: eigen: Really run tests in verbose mode.
    
    Suggested by Gaël Guennebaud <address@hidden>.
    
    * gnu/packages/algebra.scm (eigen)[arguments]: Remove #:test-target.
    Rename 'build-tests' phase to 'check', and have it run 'ctest -V'.
---
 gnu/packages/algebra.scm |   22 +++++++---------------
 1 files changed, 7 insertions(+), 15 deletions(-)

diff --git a/gnu/packages/algebra.scm b/gnu/packages/algebra.scm
index e9edf36..25e1af1 100644
--- a/gnu/packages/algebra.scm
+++ b/gnu/packages/algebra.scm
@@ -409,26 +409,18 @@ cosine/ sine transforms or DCT/DST).")
      '(;; Turn off debugging symbols to save space.
        #:build-type "Release"
 
-       ;; Use 'make check', as per
-       ;; <http://eigen.tuxfamily.org/index.php?title=Tests>.
-       #:test-target "check"
-
        #:phases (modify-phases %standard-phases
-                  (add-before 'check 'build-tests
+                  (replace 'check
                     (lambda _
-                      ;; First build the tests, in parallel.
-                      ;; See 
<http://eigen.tuxfamily.org/index.php?title=Tests>.
                       (let* ((cores  (parallel-job-count))
                              (dash-j (format #f "-j~a" cores)))
-                        ;; These variables are supposed to be honored.
-                        (setenv "EIGEN_MAKE_ARGS" dash-j)
-
-                        ;; Use '-V' to get more details in case of test
-                        ;; failures.
-                        (setenv "EIGEN_CTEST_ARGS"
-                                (string-append "-V " dash-j))
+                        ;; First build the tests, in parallel.  See
+                        ;; <http://eigen.tuxfamily.org/index.php?title=Tests>.
+                        (and (zero? (system* "make" "buildtests" dash-j))
 
-                        (zero? (system* "make" "buildtests" dash-j))))))))
+                             ;; Then run 'CTest' with -V so we get more
+                             ;; details upon failure.
+                             (zero? (system* "ctest" "-V" dash-j)))))))))
     (home-page "http://eigen.tuxfamily.org";)
     (synopsis "C++ template library for linear algebra")
     (description



reply via email to

[Prev in Thread] Current Thread [Next in Thread]