gnu: capstone: Update to 4.0.2.

* gnu/packages/engineering.scm (capstone): Update to 4.0.2.
[source]: Fix indentation and git URL.
[phases]: Strip trailing #t.
[home]: Update URL.

Co-authored-by: Maxim Cournoyer <maxim.cournoyer@gmail.com>
This commit is contained in:
Olivier Dion 2022-03-16 12:19:31 -04:00 committed by Maxim Cournoyer
parent c886968bb1
commit ba15abc008
No known key found for this signature in database
GPG key ID: 1260E46482E63562

View file

@ -28,6 +28,7 @@
;;; Copyright © 2021, 2022 Petr Hodina <phodina@protonmail.com> ;;; Copyright © 2021, 2022 Petr Hodina <phodina@protonmail.com>
;;; Copyright © 2021 Foo Chuan Wei <chuanwei.foo@hotmail.com> ;;; Copyright © 2021 Foo Chuan Wei <chuanwei.foo@hotmail.com>
;;; Copyright © 2022 Evgeny Pisemsky <evgeny@pisemsky.com> ;;; Copyright © 2022 Evgeny Pisemsky <evgeny@pisemsky.com>
;;; Copyright © 2022 Olivier Dion <olivier.dion@polymtl.ca>
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
;;; ;;;
@ -1550,16 +1551,16 @@ (define-public adms
(define-public capstone (define-public capstone
(package (package
(name "capstone") (name "capstone")
(version "3.0.5") (version "4.0.2")
(source (origin (source (origin
(method git-fetch) (method git-fetch)
(uri (git-reference (uri (git-reference
(url "https://github.com/aquynh/capstone") (url "https://github.com/capstone-engine/capstone")
(commit version))) (commit version)))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 (base32
"0dgf82kxj4rs45d6s8sr984c38sll1n5scpypjlyh21gh2yl4qfw")))) "0y5g74yjyliciawpn16zhdwya7bd3d7b1cccpcccc2wg8vni1k2w"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
`(#:tests? #f `(#:tests? #f
@ -1571,10 +1572,10 @@ (define-public capstone
;; cstool's Makefile +=s LDFLAGS, so we cannot pass it as a make flag. ;; cstool's Makefile +=s LDFLAGS, so we cannot pass it as a make flag.
(add-before 'build 'fix-cstool-ldflags (add-before 'build 'fix-cstool-ldflags
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(setenv "LDFLAGS" (string-append "-Wl,-rpath=" (setenv "LDFLAGS"
(assoc-ref outputs "out") "/lib")) (string-append "-Wl,-rpath="
#t))))) (assoc-ref outputs "out") "/lib")))))))
(home-page "https://www.capstone-engine.org") (home-page "https://github.com/capstone-engine/capstone")
(synopsis "Lightweight multi-platform, multi-architecture disassembly framework") (synopsis "Lightweight multi-platform, multi-architecture disassembly framework")
(description (description
"Capstone is a lightweight multi-platform, multi-architecture disassembly "Capstone is a lightweight multi-platform, multi-architecture disassembly