diff options
Diffstat (limited to 'guix/tests.scm')
| -rw-r--r-- | guix/tests.scm | 11 |
1 files changed, 8 insertions, 3 deletions
diff --git a/guix/tests.scm b/guix/tests.scm index 06ef3cf76d..8f6d040f1f 100644 --- a/guix/tests.scm +++ b/guix/tests.scm @@ -1,5 +1,5 @@ ;;; GNU Guix --- Functional package management for GNU -;;; Copyright © 2013-2021 Ludovic Courtès <ludo@gnu.org> +;;; Copyright © 2013-2022 Ludovic Courtès <ludo@gnu.org> ;;; ;;; This file is part of GNU Guix. ;;; @@ -85,10 +85,12 @@ "warning: build daemon error: ~s~%" c) #f)) (let ((store (open-connection uri))) - ;; Make sure we build everything by ourselves. + ;; Make sure we build everything by ourselves. When we build something, + ;; it should take at most 5 minutes. (set-build-options store #:use-substitutes? #f - #:substitute-urls (%test-substitute-urls)) + #:substitute-urls (%test-substitute-urls) + #:timeout (* 5 60)) ;; Use the bootstrap Guile when running tests, so we don't end up ;; building everything in the temporary test store. @@ -147,6 +149,9 @@ no external store to talk to." ;; further. (unsetenv "NIX_STORE_DIR")) (lambda () + (when store + ;; Make sure we don't end up rebuilding the world for those tests. + (set-build-options store #:timeout (* 10 60))) (proc store)) (lambda () (when store-variable |