aboutsummaryrefslogtreecommitdiff
path: root/guix-qa-frontpage/server.scm
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2024-05-15 13:02:15 +0100
committerChristopher Baines <mail@cbaines.net>2024-05-15 14:33:23 +0100
commit3eaa40dfe2d6be4faef89801c938a9b9232f785d (patch)
tree0b6562153210c9bdfd92a5ebf1ebcf38a583df8c /guix-qa-frontpage/server.scm
parentaaceb4715a8d68443f96d6c35ead35a317846de6 (diff)
downloadqa-frontpage-3eaa40dfe2d6be4faef89801c938a9b9232f785d.tar
qa-frontpage-3eaa40dfe2d6be4faef89801c938a9b9232f785d.tar.gz
Submit builds in parallel via fibers
Diffstat (limited to 'guix-qa-frontpage/server.scm')
-rw-r--r--guix-qa-frontpage/server.scm4
1 files changed, 4 insertions, 0 deletions
diff --git a/guix-qa-frontpage/server.scm b/guix-qa-frontpage/server.scm
index 22ad477..dba8e61 100644
--- a/guix-qa-frontpage/server.scm
+++ b/guix-qa-frontpage/server.scm
@@ -54,6 +54,7 @@
#:use-module (guix-qa-frontpage branch)
#:use-module (guix-qa-frontpage package)
#:use-module (guix-qa-frontpage issue)
+ #:use-module (guix-qa-frontpage utils)
#:use-module (guix-qa-frontpage git-repository)
#:use-module (guix-qa-frontpage manage-builds)
#:use-module (guix-qa-frontpage manage-patch-branches)
@@ -842,6 +843,9 @@ has no patches or has been closed.")
(run-fibers
(lambda ()
+ (%fiberized-submit-build
+ (fiberize submit-build #:parallelism 8))
+
(when submit-builds?
(start-submit-patch-builds-fiber database
"http://127.0.0.1:8746"