mirrors
/
cuirass
mirror of https://notabug.org/mthl/cuirass.git
1
0
Fork 0
Code Issues Releases Wiki Activity

base: Do not stop on the first build failure. 

* src/cuirass/base.scm (process-specs): Systematically call
'set-build-options'.  Pass #:keep-going? #t.
improve-build-parallelism
Ludovic Courtès 2017-02-15 00:15:21 +01:00 committed by Mathieu Lirzin
parent 2418019798
commit 61f8f75e93
No known key found for this signature in database
GPG Key ID: 0ADEE10094604D37
1 changed files with 7 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
src/cuirass/base.scm
View File

@ -1,5 +1,5 @@
;;; base.scm -- Cuirass base module
;;; Copyright © 2016 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2016, 2017 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2016 Mathieu Lirzin <mthl@gnu.org>
;;; Copyright © 2017 Mathieu Othacehe <m.othacehe@gmail.com>
;;;
@ -173,10 +173,14 @@ if required. Return the last commit ID on success, #f otherwise."
(compile (string-append (%package-cachedir) "/"
(assq-ref spec #:name))))
(with-store store
;; Always set #:keep-going? so we don't stop on the first build
;; failure.
(set-build-options store
#:use-substitutes? (%use-substitutes?)
#:keep-going? #t)
(let* ((spec* (acons #:current-commit commit spec))
(jobs (evaluate store db spec*)))
(unless (%use-substitutes?)
(set-build-options store #:use-substitutes? #f))
(build-packages store db jobs))))
(db-add-stamp db spec commit))))