diff --git a/t/scripts/hydra-update-gc-roots/update-gc-roots.t b/t/scripts/hydra-update-gc-roots/update-gc-roots.t new file mode 100644 index 00000000..9729e066 --- /dev/null +++ b/t/scripts/hydra-update-gc-roots/update-gc-roots.t @@ -0,0 +1,22 @@ +use feature 'unicode_strings'; +use strict; +use warnings; +use Setup; +use Test2::V0; + +my $ctx = test_context(); +my $builds = $ctx->makeAndEvaluateJobset( + expression => "one-job.nix", + build => 1 +); + +subtest "Updating GC roots" => sub { + my ($res, $stdout, $stderr) = captureStdoutStderr(5, ("hydra-update-gc-roots")); + is($res, 0, "hydra-update-gc-roots should exit zero"); + if ($res != 0) { + print "gc roots stdout: $stdout\n"; + print "gc roots stderr: $stderr"; + } +}; + +done_testing;