From c9a28a87e88bb1d29e839ffd8455544f67c21ab2 Mon Sep 17 00:00:00 2001 From: Tobias Geerinckx-Rice Date: Sun, 18 Aug 2024 02:00:00 +0200 Subject: gnu: exfatprogs: Run tests. * gnu/packages/file-systems.scm (exfatprogs)[arguments]: Use G-Expressions. Customise 'check phase to run the tests. Change-Id: I645444eb1b70bb71666ce6fe905e0229007f5a54 --- gnu/packages/file-systems.scm | 18 ++++++++++++++++-- 1 file changed, 16 insertions(+), 2 deletions(-) (limited to 'gnu/packages') diff --git a/gnu/packages/file-systems.scm b/gnu/packages/file-systems.scm index 3962aced33f..c6a49a6bc08 100644 --- a/gnu/packages/file-systems.scm +++ b/gnu/packages/file-systems.scm @@ -752,8 +752,22 @@ bcachefs-tools package. It is meant to be used in initrds.") (base32 "0plj52kjvhy94hdk0bq8bc7ql6yh44x76kryxhn46vwbxayv790j")))) (build-system gnu-build-system) (arguments - `(#:configure-flags - (list "--disable-static"))) + (list + #:configure-flags + #~(list "--disable-static") + #:phases + #~(modify-phases %standard-phases + (replace 'check + (lambda* (#:key tests? #:allow-other-keys) + (when tests? + (setenv "FSCK1" "../fsck/fsck.exfat") + ;; Upstream CI uses a second FSCK provided by its host operating + ;; system to verify the results of the newly-built one. That + ;; makes no sense in Guix, but we can detect crashes, unexpected + ;; inconsistencies, and other badness by testing with only one. + (setenv "FSCK2" (getenv "FSCK1")) + (with-directory-excursion "tests" + (invoke "./test_fsck.sh")))))))) (native-inputs (list autoconf automake libtool pkg-config)) (home-page "https://github.com/exfatprogs/exfatprogs") -- cgit v1.2.3