From 8ef896b103ba9288f671d18ba96fd13aab2ecc5c Mon Sep 17 00:00:00 2001 From: Christopher Baines Date: Thu, 15 Sep 2022 16:25:31 +0200 Subject: [PATCH] Further reduce some chunk sizes --- guix-data-service/model/derivation.scm | 4 ++-- guix-data-service/model/utils.scm | 2 +- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/guix-data-service/model/derivation.scm b/guix-data-service/model/derivation.scm index c910775..d61c6e5 100644 --- a/guix-data-service/model/derivation.scm +++ b/guix-data-service/model/derivation.scm @@ -1423,7 +1423,7 @@ INNER JOIN derivation_outputs AND vals.output_name = derivation_outputs.name"))))) (chunk-for-each! process-chunk - 250 + 200 (list-copy derivation-ids) (list-copy derivations))) @@ -1773,7 +1773,7 @@ WHERE " criteria ";")) file-name (string->number id)))) (exec-query conn (select-existing-derivations chunk)))) - (chunk! missing-file-names 2000))))) + (chunk! missing-file-names 1000))))) (define (derivation-file-names->derivation-ids conn derivation-file-names) (define (insert-source-files-missing-nars derivation-ids) diff --git a/guix-data-service/model/utils.scm b/guix-data-service/model/utils.scm index 093b618..093161a 100644 --- a/guix-data-service/model/utils.scm +++ b/guix-data-service/model/utils.scm @@ -366,7 +366,7 @@ WHERE table_name = $1" (delete-duplicates (concatenate data)) data) - 5000))))) + 3000))))) (missing-entries (filter (lambda (field-values) (not (vhash-assoc