mbakke pushed a commit to branch master
in repository guix.
commit aa861a3980ede130080ed492c62b097ee6f2caf7
Author: Marius Bakke <[email protected]>
AuthorDate: Sat Jan 7 14:49:25 2023 +0100
gnu: python-capstone: Fix tests.
* gnu/packages/engineering.scm (python-capstone)[arguments]: Override check
phase. While here, remove label usage in chdir-and-fix-setup-py phase.
---
gnu/packages/engineering.scm | 11 ++++++++---
1 file changed, 8 insertions(+), 3 deletions(-)
diff --git a/gnu/packages/engineering.scm b/gnu/packages/engineering.scm
index a92530d019..99ae61973d 100644
--- a/gnu/packages/engineering.scm
+++ b/gnu/packages/engineering.scm
@@ -1629,7 +1629,7 @@ bindings for Python, Java, OCaml and more.")
`(#:phases
(modify-phases %standard-phases
(add-after 'unpack 'chdir-and-fix-setup-py
- (lambda _
+ (lambda* (#:key inputs #:allow-other-keys)
(chdir "bindings/python")
;; Do not build the library again, because we already have it.
(substitute* "setup.py" ((".* build_libraries.*") ""))
@@ -1637,8 +1637,13 @@ bindings for Python, Java, OCaml and more.")
;; library.
(substitute* "capstone/__init__.py"
(("pkg_resources.resource_filename.*")
- (string-append "'" (assoc-ref %build-inputs "capstone")
"/lib',\n")))
- #t)))))))
+ (string-append "'" (dirname (search-input-file
+ inputs "lib/libcapstone.so"))
+ "',\n")))))
+ (replace 'check
+ (lambda* (#:key tests? #:allow-other-keys)
+ (when tests?
+ (invoke "make" "check")))))))))
(define-public python-esptool-3.0
