diff options
| author | Christopher Baines <mail@cbaines.net> | 2023-03-09 09:17:07 +0000 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2023-03-09 09:17:07 +0000 |
| commit | 319439d05a7e44b7d9dcca7db60c57acb3c1f334 (patch) | |
| tree | d56b0d90370e3d771a9465fd8b323e54a2d05bdd /guix-data-service/jobs | |
| parent | 659dcc6a0d0c569eb9a088beec0f13bd1cbe843f (diff) | |
| download | data-service-319439d05a7e44b7d9dcca7db60c57acb3c1f334.tar data-service-319439d05a7e44b7d9dcca7db60c57acb3c1f334.tar.gz | |
Reorder some vacuum operations when loading revisions
Diffstat (limited to 'guix-data-service/jobs')
| -rw-r--r-- | guix-data-service/jobs/load-new-guix-revision.scm | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/guix-data-service/jobs/load-new-guix-revision.scm b/guix-data-service/jobs/load-new-guix-revision.scm index 7c9a772..816cbf2 100644 --- a/guix-data-service/jobs/load-new-guix-revision.scm +++ b/guix-data-service/jobs/load-new-guix-revision.scm @@ -2175,6 +2175,10 @@ SKIP LOCKED") "vacuuming package derivations by guix revision range table" (vacuum-package-derivations-table conn)) + (with-time-logging + "vacuum-derivation-inputs-table" + (vacuum-derivation-inputs-table conn)) + (match (exec-query conn "SELECT reltuples::bigint FROM pg_class WHERE relname = 'derivation_inputs'") @@ -2189,17 +2193,13 @@ SKIP LOCKED") (update-derivation-inputs-statistics conn))))) (with-time-logging - "vacuum-derivation-inputs-table" - (vacuum-derivation-inputs-table conn)) + "vacuum-derivation-outputs-table" + (vacuum-derivation-outputs-table conn)) (with-time-logging "update-derivation-outputs-statistics" (update-derivation-outputs-statistics conn)) - (with-time-logging - "vacuum-derivation-outputs-table" - (vacuum-derivation-outputs-table conn)) - #t) (begin (exec-query conn "ROLLBACK") |