mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-24 05:18:07 -05:00
gnu: boost: Use modify-phases.
* gnu/packages/boost.scm (boost)[arguments]: Use modify-phases.
This commit is contained in:
parent
bb25130764
commit
3abe8136fd
1 changed files with 23 additions and 24 deletions
|
@ -67,7 +67,8 @@ (define-public boost
|
|||
'()))))
|
||||
`(#:tests? #f
|
||||
#:phases
|
||||
(alist-replace
|
||||
(modify-phases %standard-phases
|
||||
(replace
|
||||
'configure
|
||||
(lambda* (#:key outputs #:allow-other-keys)
|
||||
(let ((out (assoc-ref outputs "out")))
|
||||
|
@ -84,17 +85,15 @@ (define-public boost
|
|||
|
||||
(zero? (system* "./bootstrap.sh"
|
||||
(string-append "--prefix=" out)
|
||||
"--with-toolset=gcc"))))
|
||||
(alist-replace
|
||||
"--with-toolset=gcc")))))
|
||||
(replace
|
||||
'build
|
||||
(lambda* (#:key outputs #:allow-other-keys)
|
||||
(zero? (system* "./b2" ,@build-flags)))
|
||||
|
||||
(alist-replace
|
||||
(zero? (system* "./b2" ,@build-flags))))
|
||||
(replace
|
||||
'install
|
||||
(lambda* (#:key outputs #:allow-other-keys)
|
||||
(zero? (system* "./b2" "install" ,@build-flags)))
|
||||
%standard-phases))))))
|
||||
(zero? (system* "./b2" "install" ,@build-flags))))))))
|
||||
|
||||
(home-page "http://boost.org")
|
||||
(synopsis "Peer-reviewed portable C++ source libraries")
|
||||
|
|
Loading…
Reference in a new issue