guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

02/06: guix build: Use 'map/accumulate-builds'.


From: guix-commits
Subject: 02/06: guix build: Use 'map/accumulate-builds'.
Date: Wed, 25 Mar 2020 11:22:58 -0400 (EDT)

civodul pushed a commit to branch wip-build-accumulator
in repository guix.

commit 11462aba8e8058b91475cd15c1adb285e3a39ef6
Author: Ludovic Courtès <address@hidden>
AuthorDate: Wed Mar 25 12:42:54 2020 +0100

    guix build: Use 'map/accumulate-builds'.
    
    * guix/scripts/build.scm (options->derivations): Use
    'map/accumulate-builds' instead of 'append-map'.
---
 guix/scripts/build.scm | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/guix/scripts/build.scm b/guix/scripts/build.scm
index af18d8b..9f87feb 100644
--- a/guix/scripts/build.scm
+++ b/guix/scripts/build.scm
@@ -920,8 +920,10 @@ build."
   (with-unbound-variable-handling
    (parameterize ((%graft? graft?))
      (append-map (lambda (system)
-                   (append-map (cut compute-derivation <> system)
-                               things-to-build))
+                   (concatenate
+                    (map/accumulate-builds store
+                                           (cut compute-derivation <> system)
+                                           things-to-build)))
                  systems))))
 
 (define (show-build-log store file urls)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]