3
5
Fork 0
mirror of git://git.savannah.gnu.org/guix.git synced 2023-12-14 03:33:07 +01:00

gnu: qemu: Extend I/O test time-outs.

* gnu/packages/virtualization.scm (qemu)[arguments]: Add an
‘extend-test-time-outs’ phase.
This commit is contained in:
Tobias Geerinckx-Rice 2020-11-14 18:34:56 +01:00
parent e48eac3b3e
commit 1b0cda6b44
No known key found for this signature in database
GPG key ID: 0DB0FF884F556D79

View file

@ -177,6 +177,14 @@
'("include")
input-directories)
#t)))
(add-after 'unpack 'extend-test-time-outs
(lambda _
;; These tests can time out on heavily-loaded and/or slow storage.
(substitute* (cons* "tests/qemu-iotests/common.qemu"
(find-files "tests/qemu-iotests" "^[0-9]+$"))
(("QEMU_COMM_TIMEOUT=[0-9]+" match)
(string-append match "9")))
(fail)))
(add-after 'unpack 'disable-unusable-tests
(lambda _
(substitute* "tests/Makefile.include"