gnu: wla-dx: Use G-expressions.
* gnu/packages/assembly.scm (wla-dx)[arguments]: Rewrite as G-expressions.
This commit is contained in:
parent
2103e7c0fc
commit
eb12f3fd8b
1 changed files with 11 additions and 10 deletions
|
@ -359,16 +359,17 @@ package for the Game Boy and Game Boy Color. It consists of:
|
||||||
(build-system cmake-build-system)
|
(build-system cmake-build-system)
|
||||||
(native-inputs (list python-sphinx)) ; to generate man pages
|
(native-inputs (list python-sphinx)) ; to generate man pages
|
||||||
(arguments
|
(arguments
|
||||||
`(#:phases
|
(list
|
||||||
(modify-phases %standard-phases
|
#:phases
|
||||||
(add-before 'check 'copy-tests-to-build-directory
|
#~(modify-phases %standard-phases
|
||||||
(lambda _
|
(add-before 'check 'copy-tests-to-build-directory
|
||||||
(copy-recursively "../source/tests" "tests")))
|
(lambda _
|
||||||
(replace 'check
|
(copy-recursively "../source/tests" "tests")))
|
||||||
(lambda* (#:key tests? #:allow-other-keys)
|
(replace 'check
|
||||||
(let ((sh (which "sh")))
|
(lambda* (#:key tests? #:allow-other-keys)
|
||||||
(when tests?
|
(let ((sh (which "sh")))
|
||||||
(invoke sh "../source/run_tests.sh"))))))))
|
(when tests?
|
||||||
|
(invoke sh "../source/run_tests.sh"))))))))
|
||||||
(home-page "https://github.com/vhelin/wla-dx")
|
(home-page "https://github.com/vhelin/wla-dx")
|
||||||
(synopsis "Assemblers for various processors")
|
(synopsis "Assemblers for various processors")
|
||||||
(description "WLA DX is a set of tools to assemble assembly files to
|
(description "WLA DX is a set of tools to assemble assembly files to
|
||||||
|
|
Reference in a new issue