gnu: openmpi: Use gexps.

* gnu/packages/mpi.scm (openmpi)[arguments]: Use gexps.
This commit is contained in:
Ludovic Courtès 2023-02-23 15:49:09 +01:00 committed by Ludovic Courtès
parent b8d3b9d14b
commit f45fc72c28
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5

View file

@ -25,6 +25,7 @@
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
(define-module (gnu packages mpi)
#:use-module (guix gexp)
#:use-module (guix packages)
#:use-module ((guix licenses) #:prefix license:)
#:use-module (guix download)
@ -228,13 +229,14 @@ (define-public openmpi
(list pkg-config perl))
(outputs '("out" "debug"))
(arguments
`(#:configure-flags `("--enable-mpi-ext=affinity" ;cr doesn't work
(list
#:configure-flags #~`("--enable-mpi-ext=affinity" ;cr doesn't work
"--with-sge"
,@(if ,(package? (this-package-input "valgrind"))
`("--enable-memchecker"
#$@(if (package? (this-package-input "valgrind"))
#~("--enable-memchecker"
"--with-valgrind")
`("--without-valgrind"))
#~("--without-valgrind"))
"--with-hwloc=external"
"--with-libevent"
@ -253,8 +255,8 @@ (define-public openmpi
;; Enable support for SLURM's Process Manager
;; Interface (PMI).
,(string-append "--with-pmi="
(assoc-ref %build-inputs "slurm")))
#:phases (modify-phases %standard-phases
#$(this-package-input "slurm")))
#:phases #~(modify-phases %standard-phases
;; opensm is needed for InfiniBand support.
(add-after 'unpack 'find-opensm-headers
(lambda* (#:key inputs #:allow-other-keys)