me
/
guix
Archived
1
0
Fork 0
Code

gnu: dune-localfunctions: Fix build failure. 

* gnu/packages/maths.scm (dune-localfunctions)[arguments]: Add phase
'hide-gfortran'.
master
Marius Bakke 2020-04-14 22:30:05 +02:00
parent f7cbf403ef
commit 109bf6a0e7
No known key found for this signature in database
GPG Key ID: A2A06DF2A33A54FA
1 changed files with 12 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
gnu/packages/maths.scm
View File

@ -4921,6 +4921,18 @@ aggregation-based algebraic multigrid.")
(arguments (arguments
`(#:phases `(#:phases
(modify-phases %standard-phases (modify-phases %standard-phases
;; XXX: localfunctions/test/lagrangeshapefunctiontest.cc includes <fenv.h>
;; and fails to find the stdlib types when the gfortran header is used.
;; Hide gfortran from CPLUS_INCLUDE_PATH to ensure we get the GCC header.
(add-after 'set-paths 'hide-gfortran
(lambda* (#:key inputs #:allow-other-keys)
(let ((gfortran (assoc-ref inputs "gfortran")))
(setenv "CPLUS_INCLUDE_PATH"
(string-join
(delete (string-append gfortran "/include/c++")
(string-split (getenv "CPLUS_INCLUDE_PATH") #\:))
":"))
#t)))
(add-after 'build 'build-tests (add-after 'build 'build-tests
(lambda* (#:key make-flags #:allow-other-keys) (lambda* (#:key make-flags #:allow-other-keys)
(apply invoke "make" "build_tests" make-flags)))))) (apply invoke "make" "build_tests" make-flags))))))