mirror/guix
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2025-01-19 05:57:04 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

tests: Fix typos.

Browse source 
* tests/derivations.scm ("substitutable-derivation?",
  "derivation-prerequisites-to-build and substitutes, local build"): Fix
  harmless typos.
This commit is contained in:
Ludovic Courtès 2015-09-05 22:08:47 +02:00
parent 6b44a09747
commit cfc5d39888
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
tests/derivations.scm
View file

@ -199,7 +199,7 @@ (define prefix-len (string-length dir))
(and (substitutable-derivation? (derivation %store "foo" %bash '())) (and (substitutable-derivation? (derivation %store "foo" %bash '()))
(substitutable-derivation? ;see <http://bugs.gnu.org/18747> (substitutable-derivation? ;see <http://bugs.gnu.org/18747>
(derivation %store "foo" %bash '() (derivation %store "foo" %bash '()
#:local-build? #f)) #:local-build? #t))
(not (substitutable-derivation? (not (substitutable-derivation?
(derivation %store "foo" %bash '() (derivation %store "foo" %bash '()
#:substitutable? #f))))) #:substitutable? #f)))))
@ -663,7 +663,7 @@ (define %coreutils
(with-derivation-narinfo drv (with-derivation-narinfo drv
(let-values (((build download) (let-values (((build download)
(derivation-prerequisites-to-build store drv))) (derivation-prerequisites-to-build store drv)))
;; #:local-build? is not be synonymous with #:substitutable?, so we ;; #:local-build? is *not* synonymous with #:substitutable?, so we
;; must be able to substitute DRV's output. ;; must be able to substitute DRV's output.
;; See <http://bugs.gnu.org/18747>. ;; See <http://bugs.gnu.org/18747>.
(and (null? build) (and (null? build)