diff options
author | Christopher Baines <mail@cbaines.net> | 2021-04-20 22:08:58 +0100 |
---|---|---|
committer | Christopher Baines <mail@cbaines.net> | 2021-04-20 22:16:27 +0100 |
commit | 79f44cb21f4e0f4f3c279cb03c2ff2e4edb9279a (patch) | |
tree | 230600fa65097056bc4c6fd1e62e4517318f890a /guix-build-coordinator/coordinator.scm | |
parent | df3b0021a23572001de9cc92c63feb9fb532ffe9 (diff) | |
download | build-coordinator-79f44cb21f4e0f4f3c279cb03c2ff2e4edb9279a.tar build-coordinator-79f44cb21f4e0f4f3c279cb03c2ff2e4edb9279a.tar.gz |
Make some SQLite related improvements
Don't keep database connections around forever as this relates to cached query
plans, and also run the optimize pragma when closing connections.
Diffstat (limited to 'guix-build-coordinator/coordinator.scm')
-rw-r--r-- | guix-build-coordinator/coordinator.scm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/guix-build-coordinator/coordinator.scm b/guix-build-coordinator/coordinator.scm index 9c4fc09..7841502 100644 --- a/guix-build-coordinator/coordinator.scm +++ b/guix-build-coordinator/coordinator.scm @@ -483,7 +483,9 @@ (allocate-builds build-coordinator)) (metric-increment success-counter-metric)) (lambda (key . args) - (backtrace)))) + (backtrace))) + (datastore-optimize + (build-coordinator-datastore build-coordinator))) #:unwind? #t)) #:buckets ((@@ (prometheus) exponential-histogram-buckets) ; TODO #:start 1 |