mirror of
https://git.savannah.gnu.org/git/guix.git
synced 2026-04-06 21:20:33 +02:00
gnu: xyce-parallel: Improve style.
* gnu/packages/engineering.scm (xyce-parallel)[arguments]: Use G-Expressions. [inputs]: Modernize. [native-inputs]: Modernize. Change-Id: I627bf9063b5e3e29e97fb43b09e8c31d1404298a Signed-off-by: Gabriel Wicki <gabriel@erlikon.ch>
This commit is contained in:
committed by
Gabriel Wicki
parent
9f3c379509
commit
a59f32a2c3
@@ -2400,31 +2400,29 @@ parallel computing platforms. It also supports serial execution.")
|
||||
(prepend openmpi)))))
|
||||
|
||||
(define-public xyce-parallel
|
||||
(package (inherit xyce-serial)
|
||||
(package
|
||||
(inherit xyce-serial)
|
||||
(name "xyce-parallel")
|
||||
(arguments
|
||||
`(,@(substitute-keyword-arguments (package-arguments xyce-serial)
|
||||
((#:configure-flags flags)
|
||||
`(list "CXXFLAGS=-O3"
|
||||
"CXX=mpiCC"
|
||||
"CC=mpicc"
|
||||
"F77=mpif77"
|
||||
"--enable-mpi"
|
||||
(string-append
|
||||
"CFLAGS="
|
||||
" -Wno-error=builtin-declaration-mismatch"
|
||||
" -Wno-error=implicit-function-declaration"
|
||||
" -Wno-error=implicit-int")
|
||||
(string-append
|
||||
"ARCHDIR="
|
||||
(assoc-ref %build-inputs "trilinos")))))))
|
||||
(propagated-inputs
|
||||
`(("mpi" ,openmpi)))
|
||||
(substitute-keyword-arguments
|
||||
(package-arguments xyce-serial)
|
||||
((#:configure-flags flags)
|
||||
#~(list "CXXFLAGS=-O3"
|
||||
"CXX=mpiCC"
|
||||
"CC=mpicc"
|
||||
"F77=mpif77"
|
||||
"--enable-mpi"
|
||||
(string-append
|
||||
"CFLAGS="
|
||||
" -Wno-error=builtin-declaration-mismatch"
|
||||
" -Wno-error=implicit-function-declaration"
|
||||
" -Wno-error=implicit-int")
|
||||
(string-append "ARCHDIR=" #$trilinos-parallel-xyce)))))
|
||||
(propagated-inputs (list openmpi))
|
||||
(inputs
|
||||
`(("trilinos" ,trilinos-parallel-xyce)
|
||||
("zlib" ,zlib)
|
||||
,@(alist-delete "trilinos"
|
||||
(package-inputs xyce-serial))))))
|
||||
(modify-inputs (package-inputs xyce-serial)
|
||||
(append zlib)
|
||||
(replace "trilinos-serial-xyce" trilinos-parallel-xyce)))))
|
||||
|
||||
(define-public librepcb
|
||||
(package
|
||||
|
||||
Reference in New Issue
Block a user