cbaines pushed a commit to branch master
in repository data-service.
commit 5f5b8fc91dae1a8cd01c3cbee05242d0a46f123f
Author: Christopher Baines <m...@cbaines.net>
AuthorDate: Sun Mar 31 19:55:46 2024 +0100
Stop using a inferior-package-derivations lock
As this isn't for correctness reasons, but resource usage. I'm hoping to
manage this differently.
---
guix-data-service/jobs/load-new-guix-revision.scm | 11 -----------
1 file changed, 11 deletions(-)
diff --git a/guix-data-service/jobs/load-new-guix-revision.scm
b/guix-data-service/jobs/load-new-guix-revision.scm
index 3ef078c..ab838ce 100644
--- a/guix-data-service/jobs/load-new-guix-revision.scm
+++ b/guix-data-service/jobs/load-new-guix-revision.scm
@@ -1446,16 +1446,6 @@
(lambda (filename)
(put-message channel filename))))
- (define lock-num
- ;; I'm seeing problems with the guix-dameon WAL growing excessively, which
- ;; I think is happening when processing revivions involving lots of new
- ;; derivations. So limit the concurrency here in the hope that this'll
- ;; help.
- (with-time-logging "getting 'inferior-package-derivations lock"
- (lock-advisory-session-lock
- conn
- 'inferior-package-derivations)))
-
(simple-format #t "debug: extract-information-from: ~A\n" store-path)
(letpar& ((inferior-lint-checkers-and-warnings-data
@@ -1535,7 +1525,6 @@
pkg-to-replacement-hash-table))))))))
(destroy-resource-pool inf-and-store-pool)
- (unlock-advisory-session-lock conn lock-num)
(simple-format
#t "debug: finished loading information from inferior\n")
