diff options
Diffstat (limited to 'gnu/packages/algebra.scm')
| -rw-r--r-- | gnu/packages/algebra.scm | 46 |
1 files changed, 43 insertions, 3 deletions
diff --git a/gnu/packages/algebra.scm b/gnu/packages/algebra.scm index d3f2549152..e5bd12eeb8 100644 --- a/gnu/packages/algebra.scm +++ b/gnu/packages/algebra.scm @@ -74,7 +74,8 @@ #:use-module (guix hg-download) #:use-module ((guix licenses) #:prefix license:) #:use-module (guix packages) - #:use-module (guix utils)) + #:use-module (guix utils) + #:use-module (ice-9 match)) (define-public mpfrcx @@ -1009,10 +1010,39 @@ extends it by a set of algebraic capabilities.") #t)))) (build-system cmake-build-system) (arguments - '(;; Turn off debugging symbols to save space. + `(;; Turn off debugging symbols to save space. #:build-type "Release" + #:modules ((ice-9 match) + (guix build utils) + (guix build cmake-build-system)) + #:phases (modify-phases %standard-phases + (add-after 'unpack 'disable-some-tests + ;; Not all platforms are well supported by the test suite. + (lambda _ + ,@(match (%current-system) + ("i686-linux" + `((substitute* "test/CMakeLists.txt" + ((".*packetmath.*") "")))) + ("aarch64-linux" + `((substitute* "test/CMakeLists.txt" + ((".*array_cwise.*") "") + ((".*vectorization_logic.*") "")))) + ("armhf-linux" + `((substitute* "test/CMakeLists.txt" + ((".*geo_quaternion.*") "") + ((".*jacobisvd.*") "") + ((".*packetmath.*") "") + ((".*prec_inverse.*") "") + ((".*qr_colpivoting.*") "") + ((".*vectorization_logic.*") "")))) + ("riscv64-linux" + `((substitute* "test/CMakeLists.txt" + ((".*array_cwise.*") "") + ((".*geo_quaternion.*") "")))) + (_ + '((display "No tests to disable on this architecture.\n")))))) (replace 'check (lambda* (#:key tests? #:allow-other-keys) (let* ((cores (parallel-job-count)) @@ -1101,6 +1131,11 @@ features, and more.") (substitute* "unsupported/CMakeLists.txt" (("add_subdirectory\\(test.*") "# Do not build the tests for unsupported features.\n")))))) + (arguments + (substitute-keyword-arguments (package-arguments eigen) + ((#:phases phases) + `(modify-phases ,phases + (delete 'disable-some-tests))))) (native-inputs (list gcc-7))))) @@ -1129,7 +1164,12 @@ features, and more.") '(begin (substitute* "unsupported/CMakeLists.txt" (("add_subdirectory\\(test.*") - "# Do not build the tests for unsupported features.\n"))))))))) + "# Do not build the tests for unsupported features.\n")))))) + (arguments + (substitute-keyword-arguments (package-arguments eigen) + ((#:phases phases) + `(modify-phases ,phases + (delete 'disable-some-tests)))))))) (define-public xtensor (package |