branch master updated: Remove another par-map call.

[Mathieu Othacehe]

This is an automated email from the git hooks/post-receive script.

mothacehe pushed a commit to branch master
in repository guix-cuirass.

The following commit(s) were added to refs/heads/master by this push:
     new 71aac24  Remove another par-map call.
71aac24 is described below

commit 71aac24f3fe8cb396c9d232453d8721519cae914
Author: Mathieu Othacehe <othacehe@gnu.org>
AuthorDate: Sat Oct 3 15:01:28 2020 +0200

    Remove another par-map call.
    
    This is a follow-up of 761443bca6178b4ac299a8bd368d1cac4abda5f8.
    
    * src/cuirass/base.scm (fetch-inputs): Use map to replace the previous 
par-map
    call.
    (compile-checkouts): Also replace par-map call by map.
---
 src/cuirass/base.scm | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/src/cuirass/base.scm b/src/cuirass/base.scm
index 5a0c826..e993232 100644
--- a/src/cuirass/base.scm
+++ b/src/cuirass/base.scm
@@ -745,8 +745,7 @@ by PRODUCT-SPECS."
                  (fetch-input store input
                               #:writable-copy? (compile? input)))))
            inputs))
-         (results (non-blocking
-                   (par-map %non-blocking thunks))))
+         (results (map %non-blocking thunks)))
     (map (lambda (checkout)
            (log-message "fetched input '~a' of spec '~a' (commit ~s)"
                         (assq-ref checkout #:input)
@@ -767,7 +766,7 @@ by PRODUCT-SPECS."
                             (assq-ref checkout #:commit))
                (compile checkout)))
            checkouts))
-         (results (par-map %non-blocking thunks)))
+         (results (map %non-blocking thunks)))
     (map (lambda (checkout)
            (log-message "compiled input '~a' of spec '~a' (commit ~s)"
                         (assq-ref checkout #:input)