amaharaneko/guix-mirrors
1
1
Fork 0
mirror of https://codeberg.org/guix/guix.git synced 2025-10-02 02:15:12 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

tests: Reduce build timeout to 3 minutes for Scheme tests.

Browse source 
* guix/tests.scm (open-connection-for-tests): Reduce #:timeout to 3mn.
(call-with-external-store): Likewise.

Change-Id: I4375e070618a5f38a82a1d26f8424bf4abb607e6
This commit is contained in:
Ludovic Courtès 2025-08-29 14:16:13 +02:00
parent 128f07cd01
commit 1c235670d8
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 4 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

8
guix/tests.scm
View file

@ -1,5 +1,5 @@
;;; GNU Guix --- Functional package management for GNU ;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2013-2022 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2013-2022, 2025 Ludovic Courtès <ludo@gnu.org>
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
;;; ;;;
@ -86,11 +86,11 @@
#f)) #f))
(let ((store (open-connection uri))) (let ((store (open-connection uri)))
;; Make sure we build everything by ourselves. When we build something, ;; Make sure we build everything by ourselves. When we build something,
;; it should take at most 10 minutes. ;; it should take at most 3 minutes.
(set-build-options store (set-build-options store
#:use-substitutes? #f #:use-substitutes? #f
#:substitute-urls (%test-substitute-urls) #:substitute-urls (%test-substitute-urls)
#:timeout (* 10 60)) #:timeout (* 3 60))
;; Use the bootstrap Guile when running tests, so we don't end up ;; Use the bootstrap Guile when running tests, so we don't end up
;; building everything in the temporary test store. ;; building everything in the temporary test store.
@ -151,7 +151,7 @@ no external store to talk to."
(lambda () (lambda ()
(when store (when store
;; Make sure we don't end up rebuilding the world for those tests. ;; Make sure we don't end up rebuilding the world for those tests.
(set-build-options store #:timeout (* 10 60))) (set-build-options store #:timeout (* 3 60)))
(proc store)) (proc store))
(lambda () (lambda ()
(when store-variable (when store-variable