summary refs log tree commit diff
diff options
context:
space:
mode:
authorTobias Geerinckx-Rice <me@tobias.gr>2020-11-14 18:34:56 +0100
committerTobias Geerinckx-Rice <me@tobias.gr>2020-11-15 00:12:11 +0100
commit1b0cda6b442dd79324eaeb5b552cbc32faca3726 (patch)
tree67f53d188782fe34335adcaa479b8609c96a82e8
parente48eac3b3ed0a29dbcf87cd22106354f50494751 (diff)
downloadguix-1b0cda6b442dd79324eaeb5b552cbc32faca3726.tar.gz
gnu: qemu: Extend I/O test time-outs.
* gnu/packages/virtualization.scm (qemu)[arguments]: Add an
‘extend-test-time-outs’ phase.
-rw-r--r--gnu/packages/virtualization.scm8
1 files changed, 8 insertions, 0 deletions
diff --git a/gnu/packages/virtualization.scm b/gnu/packages/virtualization.scm
index deacb60ad0..176201bd33 100644
--- a/gnu/packages/virtualization.scm
+++ b/gnu/packages/virtualization.scm
@@ -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"