summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorJan Nieuwenhuizen <janneke@gnu.org>2016-09-15 22:50:42 +0200
committerMathieu Lirzin <mthl@gnu.org>2016-09-23 16:16:29 +0200
commitfca42b010e56532fded536534ccb15b078a33e77 (patch)
tree39cd0215f7b52c3ef97477fa8c15f9640d9585b9 /src
parentff7c3a11f2b32336cb185479ae7ab0a864644715 (diff)
downloadcuirass-fca42b010e56532fded536534ccb15b078a33e77.tar
cuirass-fca42b010e56532fded536534ccb15b078a33e77.tar.gz
cuirass: Optionally support using of substitutes.
* bin/cuirass.in (options): Add --use-substitutes. (show-help): Idem. (main): Set %use-substitutes?. Signed-off-by: Mathieu Lirzin <mthl@gnu.org>
Diffstat (limited to 'src')
-rw-r--r--src/cuirass/base.scm10
1 files changed, 8 insertions, 2 deletions
diff --git a/src/cuirass/base.scm b/src/cuirass/base.scm
index 52e0d00..8ad6af4 100644
--- a/src/cuirass/base.scm
+++ b/src/cuirass/base.scm
@@ -34,7 +34,12 @@
build-packages
process-specs
;; Parameters.
- %package-cachedir))
+ %package-cachedir
+ %use-substitutes?))
+
+(define %use-substitutes?
+ ;; Define whether to use substitutes
+ (make-parameter #f))
(define %package-cachedir
;; Define to location of cache directory of this package.
@@ -149,7 +154,8 @@ if required."
(with-store store
(let* ((spec* (acons #:current-commit commit spec))
(jobs (evaluate store db spec*)))
- (set-build-options store #:use-substitutes? #f)
+ (unless (%use-substitutes?)
+ (set-build-options store #:use-substitutes? #f))
(build-packages store db jobs))))
(db-add-stamp db spec commit)))
jobspecs))