diff options
author | Christopher Baines <mail@cbaines.net> | 2020-04-29 20:46:42 +0100 |
---|---|---|
committer | Christopher Baines <mail@cbaines.net> | 2020-04-29 20:46:42 +0100 |
commit | 69cd15b64a1b4dc8276abb2b273ba185f9a48ba2 (patch) | |
tree | e2bd308b73e1bd1bdeb5da8c71c4faf065d85cdf | |
parent | 82ea7c7fe76c4e1c194eab1ad7bfbbd1b725de83 (diff) | |
download | build-coordinator-69cd15b64a1b4dc8276abb2b273ba185f9a48ba2.tar build-coordinator-69cd15b64a1b4dc8276abb2b273ba185f9a48ba2.tar.gz |
Only return setup failures for unprocessed builds
The ones for processed builds aren't relevent to the allocator.
-rw-r--r-- | guix-build-coordinator/datastore/sqlite.scm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/guix-build-coordinator/datastore/sqlite.scm b/guix-build-coordinator/datastore/sqlite.scm index faaf8d1..0183da1 100644 --- a/guix-build-coordinator/datastore/sqlite.scm +++ b/guix-build-coordinator/datastore/sqlite.scm @@ -690,7 +690,11 @@ GROUP BY agent_id, failure_reason"))) (sqlite-prepare db " -SELECT id, build_id, agent_id, failure_reason FROM setup_failures"))) +SELECT id, build_id, agent_id, failure_reason +FROM setup_failures +INNER JOIN builds + ON builds.uuid = setup_failures.build_id +WHERE builds.processed = 0"))) (let ((result (sqlite-fold (lambda (row result) |