futurile/guix-play
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

gnu: ncdu: Use zig-build-system.

Browse Source 
* gnu/packages/ncdu.scm (ncdu)[build-system]: Use zig-build-system.
[arguments]<#:make-flags>: Remove argument.
<#:phases>: Delegate phase manipulation to the build-system.
Remove 'validate-runpath.
[native-inputs]: Remove zig-0.10.

Change-Id: I9027a1cbd925cfb0c135740e81a33b62cb9d91ca
Signed-off-by: Hilton Chain <hako@ultrarare.space>
This commit is contained in:
Ekaitz Zarraga 2023-12-04 16:48:39 +01:00 committed by Hilton Chain
parent 92640eedca
commit 20223da2f2
No known key found for this signature in database
GPG Key ID: ACC66D09CA528292
1 changed files with 6 additions and 18 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

24
gnu/packages/ncdu.scm
View File

@ -21,14 +21,14 @@
(define-module (gnu packages ncdu)
#:use-module (gnu packages)
#:use-module (gnu packages ncurses)
#:use-module (gnu packages perl)
#:use-module (guix licenses)
#:use-module (guix packages)
#:use-module (guix download)
#:use-module (guix utils)
#:use-module (guix gexp)
#:use-module (guix build-system gnu)
#:use-module (gnu packages perl)
#:use-module (gnu packages zig))
#:use-module (guix build-system zig))
(define-public ncdu-1
;; This old version is ‘LTS’. Version 2 works fine and has more features,
@ -73,28 +73,16 @@ ncurses installed.")
#~(begin
;; Delete a pregenerated man page. We'll build it ourselves.
(delete-file "ncdu.1")))))
(build-system zig-build-system)
(arguments
(list
#:make-flags
#~(list (string-append "PREFIX=" #$output)
(string-append "CC=" #$(cc-for-target))
(string-append "ZIG_FLAGS=-Drelease-fast"))
#:phases
#~(modify-phases %standard-phases
(delete 'configure) ; No configure script.
(add-before 'build 'pre-build
(lambda _
(setenv "ZIG_GLOBAL_CACHE_DIR"
(mkdtemp "/tmp/zig-cache-XXXXXX"))))
(delete 'validate-runpath)
(add-after 'build 'build-manpage
(lambda _
(invoke "make" "doc")))
(replace 'check
(lambda* (#:key tests? #:allow-other-keys)
(when tests?
(invoke "zig" "test" "build.zig")))))))
(native-inputs
(list perl zig-0.10))
(invoke "make" "doc"))))))
(native-inputs (list perl))
(properties `((tunable? . #t)))))
(define-public ncdu-2