amaharaneko/guix-mirrors
1
1
Fork 0
mirror of https://codeberg.org/guix/guix.git synced 2025-10-02 02:15:12 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

tests: Remove extraneous 'with-store' in derivations test.

Browse source 
* tests/derivations.scm ("derivation fails but keep going"): Remove extraneous
'with-store'.

Change-Id: If30c2d457504b8524cd167f1a145fbbea61b513c
Signed-off-by: Maxim Cournoyer <maxim.cournoyer@gmail.com>
This commit is contained in:
Maxim Cournoyer 2025-02-17 14:35:07 +00:00
parent 0bda75dd47
commit aea511df93
No known key found for this signature in database
GPG key ID: 1260E46482E63562
1 changed files with 22 additions and 23 deletions
Download patch file Download diff file Expand all files Collapse all files

3
tests/derivations.scm
View file

@ -150,7 +150,6 @@
(test-assert "derivation fails but keep going" (test-assert "derivation fails but keep going"
;; In keep-going mode, 'build-derivations' should fail because of D1, but it ;; In keep-going mode, 'build-derivations' should fail because of D1, but it
;; must return only after D2 has succeeded. ;; must return only after D2 has succeeded.
(with-store store
(let* ((d1 (derivation %store "fails" (let* ((d1 (derivation %store "fails"
%bash `("-c" "false") %bash `("-c" "false")
#:sources (list %bash))) #:sources (list %bash)))
@ -172,7 +171,7 @@
(not (valid-path? %store (derivation->output-path d1))) (not (valid-path? %store (derivation->output-path d1)))
(valid-path? %store (derivation->output-path d2))))) (valid-path? %store (derivation->output-path d2)))))
(build-derivations %store (list d1 d2)) (build-derivations %store (list d1 d2))
#f)))) #f)))
(test-assert "identical files are deduplicated" (test-assert "identical files are deduplicated"
;; Note: DATA must be longer than %DEDUPLICATION-MINIMUM-SIZE. ;; Note: DATA must be longer than %DEDUPLICATION-MINIMUM-SIZE.