guix/data-service
2
0
Fork 0
mirror of git://git.savannah.gnu.org/guix/data-service.git synced 2023-12-14 03:23:03 +01:00
Code Issues Releases Wiki Activity

Query builds for system test derivations

Browse source
This commit is contained in:
Christopher Baines 2020-02-03 09:57:26 +01:00
parent 8f0d5b51b1
commit 00d9664714
1 changed files with 17 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

17
guix-data-service/builds.scm
View file

@ -467,6 +467,23 @@ WHERE NOT EXISTS (
(string-join (map quote-string revision-commits) ",")
")"))
"
UNION ALL
SELECT derivations_by_output_details_set.derivation_output_details_set_id
FROM guix_revision_system_test_derivations
INNER JOIN derivations_by_output_details_set
ON guix_revision_system_test_derivations.derivation_id =
derivations_by_output_details_set.derivation_id
INNER JOIN guix_revisions
ON guix_revisions.id = guix_revision_system_test_derivations.guix_revision_id
"
(if (null? revision-commits)
""
(string-append
"
WHERE guix_revisions.commit IN ("
(string-join (map quote-string revision-commits) ",")
")"))
"
)
ORDER BY derivation_output_details_sets.id, derivation_output_details.id
LIMIT 15000"))