mirror of
https://gitlab.univ-nantes.fr/glicid-public/guix-glicid.git
synced 2025-04-29 21:58:36 +02:00
43 lines
1.5 KiB
Scheme
43 lines
1.5 KiB
Scheme
(define-module (glicid packages mpi)
|
||
#:use-module (guix packages)
|
||
#:use-module (guix download)
|
||
#:use-module ((gnu packages mpi)
|
||
#:prefix gnu:)
|
||
#:use-module (glicid utils)
|
||
#:use-module (guix utils)
|
||
#:use-module (glicid packages parallel)
|
||
#:use-module (gnu packages parallel)
|
||
#:use-module (guix gexp)
|
||
#:use-module (gnu packages))
|
||
|
||
|
||
;(define-public openmpi-glicid-internal-pmix
|
||
; (package/inherit gnu:openmpi-4
|
||
; (name "openmpi-glicid")
|
||
; (inputs (modify-inputs (package-inputs gnu:openmpi-4)
|
||
; (append openpmix) ;; because we use pmix4 now, openpmi-4 defaults to internal pmix3
|
||
; (replace "slurm" slurm-glicid)))
|
||
;
|
||
; )
|
||
;)
|
||
|
||
|
||
|
||
(define-public openmpi-glicid-pmix
|
||
(package/inherit gnu:openmpi-4
|
||
(name "openmpi-glicid")
|
||
(arguments
|
||
(substitute-keyword-arguments (package-arguments gnu:openmpi-4)
|
||
((#:configure-flags flags)
|
||
#~(append #$flags (list ;; original flags has --with-pmix=internal, we should remove it but last --with-pmix is the one taken into account.
|
||
(string-append "--with-pmix=" #$(this-package-input "openpmix"))
|
||
(string-append "--with-prrte=" #$(this-package-input "prrte"))
|
||
) ;#$flags
|
||
))))
|
||
(inputs (modify-inputs (package-inputs gnu:openmpi-4)
|
||
(append openpmix) ;; because we use pmix4 now, openpmi-4 defaults to internal pmix3
|
||
(append prrte) ;; idem
|
||
(replace "slurm" slurm-glicid)))
|
||
|
||
)
|
||
)
|