aboutsummaryrefslogtreecommitdiff
path: root/tests
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2023-02-08 13:23:41 +0100
committerChristopher Baines <mail@cbaines.net>2023-02-08 14:56:48 +0000
commit3ba841865663429392f869aedcd8f1fb63f278db (patch)
tree1387322e17a762d27d26d1511ff5305d80fe3527 /tests
parent9e9fc1ba04add1ceea28e1889058049cf564f2f1 (diff)
downloaddata-service-3ba841865663429392f869aedcd8f1fb63f278db.tar
data-service-3ba841865663429392f869aedcd8f1fb63f278db.tar.gz
Allow skipping processing system tests
Generating system test derivations are difficult, since you generally need to do potentially expensive builds for the system you're generating the system tests for. You might not want to disable grafts for instance because you might be trying to test whatever the test is testing in the context of grafts being enabled. I'm looking at skipping the system tests on data.guix.gnu.org, because they're not used and quite expensive to compute.
Diffstat (limited to 'tests')
-rw-r--r--tests/jobs-load-new-guix-revision.scm6
1 files changed, 4 insertions, 2 deletions
diff --git a/tests/jobs-load-new-guix-revision.scm b/tests/jobs-load-new-guix-revision.scm
index b70d702..0f40e52 100644
--- a/tests/jobs-load-new-guix-revision.scm
+++ b/tests/jobs-load-new-guix-revision.scm
@@ -59,7 +59,8 @@
(mock
((guix-data-service jobs load-new-guix-revision)
extract-information-from
- (lambda (conn store guix-revision-id commit store-path)
+ (lambda* (conn store guix-revision-id commit store-path
+ #:key skip-system-tests?)
#t))
(mock
@@ -170,7 +171,8 @@
(mock
((guix-data-service jobs load-new-guix-revision)
extract-information-from
- (lambda (conn store git-repository-id commit store-path)
+ (lambda* (conn store git-repository-id commit store-path
+ #:key skip-system-tests?)
#f))
(mock