gnu: boost: Update to 1.66.0.

* gnu/packages/boost.scm (boost): Update to 1.66.0.
[arguments]: Replace system* with invoke.
[home-page]: Update URI.
This commit is contained in:
Arun Isaac 2018-02-13 05:03:58 +05:30 committed by Leo Famulari
parent 6a778c7560
commit baef70bb86
No known key found for this signature in database
GPG Key ID: 2646FA30BACA7F08
1 changed files with 17 additions and 16 deletions

View File

@ -6,6 +6,7 @@
;;; Copyright © 2015 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2015 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2017 Thomas Danckaert <post@thomasdanckaert.be> ;;; Copyright © 2017 Thomas Danckaert <post@thomasdanckaert.be>
;;; Copyright © 2018 Tobias Geerinckx-Rice <me@tobias.gr> ;;; Copyright © 2018 Tobias Geerinckx-Rice <me@tobias.gr>
;;; Copyright © 2018 Arun Isaac <arunisaac@systemreboot.net>
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
;;; ;;;
@ -37,7 +38,7 @@
(define-public boost (define-public boost
(package (package
(name "boost") (name "boost")
(version "1.64.0") (version "1.66.0")
(source (origin (source (origin
(method url-fetch) (method url-fetch)
(uri (string-append (uri (string-append
@ -46,7 +47,7 @@
".tar.bz2")) ".tar.bz2"))
(sha256 (sha256
(base32 (base32
"0cikd35xfkpg9nnl76yqqnqxnf3hyfjjww8xjd4akflprsm5rk3v")))) "1aaw48cmimsskzgiclwn0iifp62a5iw9cbqrhfari876af1828ap"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(inputs `(("icu4c" ,icu4c) (inputs `(("icu4c" ,icu4c)
("zlib" ,zlib))) ("zlib" ,zlib)))
@ -73,8 +74,7 @@
'())) '()))
#:phases #:phases
(modify-phases %standard-phases (modify-phases %standard-phases
(replace (replace 'configure
'configure
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let ((out (assoc-ref outputs "out"))) (let ((out (assoc-ref outputs "out")))
(substitute* '("libs/config/configure" (substitute* '("libs/config/configure"
@ -88,21 +88,22 @@
(setenv "SHELL" (which "sh")) (setenv "SHELL" (which "sh"))
(setenv "CONFIG_SHELL" (which "sh")) (setenv "CONFIG_SHELL" (which "sh"))
(zero? (system* "./bootstrap.sh" (invoke "./bootstrap.sh"
(string-append "--prefix=" out) (string-append "--prefix=" out)
"--with-toolset=gcc"))))) "--with-toolset=gcc")
(replace #t)))
'build (replace 'build
(lambda* (#:key outputs make-flags #:allow-other-keys) (lambda* (#:key outputs make-flags #:allow-other-keys)
(zero? (apply system* "./b2" (apply invoke "./b2"
(format #f "-j~a" (parallel-job-count)) (format #f "-j~a" (parallel-job-count))
make-flags)))) make-flags)
(replace #t))
'install (replace 'install
(lambda* (#:key outputs make-flags #:allow-other-keys) (lambda* (#:key outputs make-flags #:allow-other-keys)
(zero? (apply system* "./b2" "install" make-flags))))))) (apply invoke "./b2" "install" make-flags)
#t)))))
(home-page "http://boost.org") (home-page "http://www.boost.org")
(synopsis "Peer-reviewed portable C++ source libraries") (synopsis "Peer-reviewed portable C++ source libraries")
(description (description
"A collection of libraries intended to be widely useful, and usable "A collection of libraries intended to be widely useful, and usable