gnu: radare2: Improve style.

* gnu/packages/engineering.scm (radare2)[arguments]: Use G-Expressions.
<#:phases>{mklibdir}: Use #$output and remove lambda arguments.
<#:make-flags>: Use cc-for-target.

Change-Id: I3e171e767965b3ff87e5562c2bcdbcc5dfbcf61b
Signed-off-by: Maxim Cournoyer <maxim@guixotic.coop>
This commit is contained in:
Cayetano Santos 2025-08-12 21:37:59 +02:00 committed by Maxim Cournoyer
parent a308eead37
commit 0e4cb907fb
No known key found for this signature in database
GPG key ID: 1260E46482E63562

View file

@ -2285,22 +2285,20 @@ bootloader in Espressif ESP8266 & ESP32 series chips.")
(file-name (git-file-name name version)))) (file-name (git-file-name name version))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
'(#:tests? #f ; tests require git and network access (list
#:phases #:tests? #f ; tests require git and network access
(modify-phases %standard-phases #:phases
(add-before 'configure 'mklibdir #~(modify-phases %standard-phases
(lambda* (#:key inputs outputs #:allow-other-keys) (add-before 'configure 'mklibdir
(mkdir-p (string-append (assoc-ref outputs "out") "/lib")) (lambda _ (mkdir-p (string-append #$output "/lib")))))
#t))) #:configure-flags
#:configure-flags #~(list "--with-openssl"
(list "--with-openssl" "--with-rpath"
"--with-rpath" "--with-syscapstone"
"--with-syscapstone" "--with-sysmagic"
"--with-sysmagic" "--with-syszip"
"--with-syszip" "--with-sysxxhash")
"--with-sysxxhash") #:make-flags #~(list (string-append "CC=" #$(cc-for-target)))))
#:make-flags
(list "CC=gcc")))
;; TODO: Add gmp and libzip and make the build system actually find them. ;; TODO: Add gmp and libzip and make the build system actually find them.
(inputs (inputs
(list capstone libuv openssl zip)) (list capstone libuv openssl zip))