ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-25 13:58:15 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

tests: Run without substitutes.

Browse source 
* tests/builders.scm, tests/derivations.scm, tests/packages.scm: Set
  #:use-substitutes? #f for %STORE.
This commit is contained in:
Ludovic Courtès 2012-11-02 22:38:52 +01:00
parent 0afdc48532
commit 81dbd783bd
3 changed files with 11 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
tests/builders.scm
View file

@ -34,6 +34,10 @@ (define-module (test-builders)
(define %store (define %store
(false-if-exception (open-connection))) (false-if-exception (open-connection)))
(when %store
;; Make sure we build everything by ourselves.
(set-build-options %store #:use-substitutes? #f))
(define %bootstrap-inputs (define %bootstrap-inputs
;; Use the bootstrap inputs so it doesn't take ages to run these tests. ;; Use the bootstrap inputs so it doesn't take ages to run these tests.
;; This still involves building Make, Diffutils, and Findutils. ;; This still involves building Make, Diffutils, and Findutils.

3
tests/derivations.scm
View file

@ -39,6 +39,9 @@ (define %store
(false-if-exception (open-connection))) (false-if-exception (open-connection)))
(when %store (when %store
;; Make sure we build everything by ourselves.
(set-build-options %store #:use-substitutes? #f)
;; By default, use %BOOTSTRAP-GUILE for the current system. ;; By default, use %BOOTSTRAP-GUILE for the current system.
(let ((drv (package-derivation %store %bootstrap-guile))) (let ((drv (package-derivation %store %bootstrap-guile)))
(%guile-for-build drv))) (%guile-for-build drv)))

4
tests/packages.scm
View file

@ -35,6 +35,10 @@ (define-module (test-packages)
(define %store (define %store
(false-if-exception (open-connection))) (false-if-exception (open-connection)))
(when %store
;; Make sure we build everything by ourselves.
(set-build-options %store #:use-substitutes? #f))
(define %bootstrap-inputs (define %bootstrap-inputs
;; Use the bootstrap inputs so it doesn't take ages to run these tests. ;; Use the bootstrap inputs so it doesn't take ages to run these tests.
;; This still involves building GNU Make and GNU Diffutils. ;; This still involves building GNU Make and GNU Diffutils.