aboutsummaryrefslogtreecommitdiff
path: root/gnu
diff options
context:
space:
mode:
authorTobias Geerinckx-Rice <me@tobias.gr>2024-09-08 02:00:00 +0200
committerTobias Geerinckx-Rice <me@tobias.gr>2024-09-08 02:00:00 +0200
commita4e57de06163bdc5f355116697aac0f6b6e36c21 (patch)
treee25485b2612ddcacfd3ce1ba6830ff0d2e07ee12 /gnu
parentbf6138e9ac1eb5965efb196c171d7e665100dbaa (diff)
downloadguix-a4e57de06163bdc5f355116697aac0f6b6e36c21.tar.gz
guix-a4e57de06163bdc5f355116697aac0f6b6e36c21.zip
gnu: stress-ng: Reduce test coverage.
* gnu/packages/admin.scm (stress-ng)[arguments]: Delete the 'check-a-little-harder phase. Change-Id: I32dc1a0fcad4a0f4763954f060d0b19cbeef23ca
Diffstat (limited to 'gnu')
-rw-r--r--gnu/packages/admin.scm25
1 files changed, 4 insertions, 21 deletions
diff --git a/gnu/packages/admin.scm b/gnu/packages/admin.scm
index 7a5fb3ca29..512c34f095 100644
--- a/gnu/packages/admin.scm
+++ b/gnu/packages/admin.scm
@@ -2629,30 +2629,13 @@ system is under heavy load.")
"/share/stress-ng/example-jobs")
(string-append "BASHDIR=" #$output
"/share/bash-completion/completions"))
+ ;; There is also a fast-test-all that very briefly runs every single
+ ;; stressor, but its utility is questionable compared to its cost.
+ ;; See this package's git history for details & which tests to skip.
#:test-target "lite-test"
#:phases
#~(modify-phases %standard-phases
- (delete 'configure) ; no configure script
- (add-after 'check 'check-a-little-harder
- ;; XXX Guix supports only one #:test-target. Run more tests.
- (lambda* (#:key tests? #:allow-other-keys #:rest args)
- (when tests?
- (substitute* "debian/tests/fast-test-all"
- (("^EXCLUDE=\"" exclude=)
- (string-append
- exclude=
- (string-join
- '("fpunch" ;fails for reasons not investigated
- "prio-inv" ;requires elevated privileges
- "ptrace") ;fails if host kernel denies ptracing
- " ") " "))
- ;; There's a commented list of ‘tests that can lock up
- ;; some kernels or are CPU/arch specific’. Uncomment it.
- (("#(EXCLUDE=)" _ uncomment) uncomment)
- ;; Make it so that both lists are appended, with spaces.
- (("EXCLUDE=\"") "EXCLUDE+=\" "))
- (apply (assoc-ref %standard-phases 'check)
- `(,@args #:test-target "fast-test-all"))))))))
+ (delete 'configure)))) ;no configure script
(inputs
(list keyutils
kmod