me/guix
Archived
1
0
Fork 0
Code Activity

gnu: pt-scotch, pt-scotch32: Add Open MPI setup phase.

Browse source 
* gnu/packages/maths.scm (pt-scotch)[arguments]: Use 'invoke' instead of
'system*'.  Add 'mpi-setup' phase.
(pt-scotch32)[arguments]: Likewise.
This commit is contained in:
Ludovic Courtès 2018-11-23 17:47:31 +01:00
parent d57ec906ba
commit c491f7f8de
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 17 additions and 16 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

29
gnu/packages/maths.scm
View file

@ -2600,15 +2600,16 @@ YACC = bison -pscotchyy -y -b y
(replace
'build
(lambda _
(and
(zero? (system* "make"
(format #f "-j~a" (parallel-job-count))
"ptscotch" "ptesmumps"))
(invoke "make" (format #f "-j~a" (parallel-job-count))
"ptscotch" "ptesmumps")
;; Install the serial metis compatibility library
(zero? (system* "make" "-C" "libscotchmetis" "install")))))
(replace
'check
(lambda _ (zero? (system* "make" "ptcheck"))))))))
(invoke "make" "-C" "libscotchmetis" "install")))
(add-before 'check 'mpi-setup
,%openmpi-setup)
(replace 'check
(lambda _
(invoke "make" "ptcheck")))))))
(synopsis "Programs and libraries for graph algorithms (with MPI)")))
(define-public pt-scotch32
@ -2622,15 +2623,15 @@ YACC = bison -pscotchyy -y -b y
`(modify-phases ,scotch32-phases
(replace 'build
(lambda _
(and
(zero? (system* "make"
(format #f "-j~a" (parallel-job-count))
"ptscotch" "ptesmumps"))
(invoke "make" (format #f "-j~a" (parallel-job-count))
"ptscotch" "ptesmumps")
;; Install the serial metis compatibility library
(zero? (system* "make" "-C" "libscotchmetis" "install")))))
(invoke "make" "-C" "libscotchmetis" "install")))
(add-before 'check 'mpi-setup
,%openmpi-setup)
(replace 'check
(lambda _
(zero? (system* "make" "ptcheck"))))))))
(invoke "make" "ptcheck")))))))
(synopsis
"Programs and libraries for graph algorithms (with MPI and 32-bit integers)")))