Create a basic test which verifies we can't delete the derivation of aggregate jobs
This commit is contained in:
		
							
								
								
									
										20
									
								
								t/evaluator/evaluate-constituents-gc.t
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										20
									
								
								t/evaluator/evaluate-constituents-gc.t
									
									
									
									
									
										Normal file
									
								
							| @@ -0,0 +1,20 @@ | ||||
| use strict; | ||||
| use warnings; | ||||
| use Setup; | ||||
| use Test2::V0; | ||||
|  | ||||
| my $ctx = test_context(); | ||||
|  | ||||
| my $builds = $ctx->makeAndEvaluateJobset( | ||||
|     expression => 'constituents.nix', | ||||
| ); | ||||
|  | ||||
| my $constituentA = $builds->{"constituentA"}; | ||||
| my $directAggregate = $builds->{"direct_aggregate"}; | ||||
| my $indirectAggregate = $builds->{"indirect_aggregate"}; | ||||
|  | ||||
| is(system('nix-store', '--delete', $constituentA->drvpath), 256, "Deleting a constituent derivation fails"); | ||||
| is(system('nix-store', '--delete', $directAggregate->drvpath), 256, "Deleting the direct aggregate derivation fails"); | ||||
| is(system('nix-store', '--delete', $indirectAggregate->drvpath), 256, "Deleting the indirect aggregate derivation fails"); | ||||
|  | ||||
| done_testing; | ||||
		Reference in New Issue
	
	Block a user