apteryx pushed a commit to branch master
in repository guix.

commit 575cb765e28f620edbfdbdeaadd1351b28233257
Author: Maxim Cournoyer <[email protected]>
AuthorDate: Mon Dec 16 14:59:23 2024 +0900

    build/guile-build-system: Fix byte-compilation warnings.
    
    * guix/build/guile-build-system.scm: Hide 'delete' from (guix build utils), 
to
    avoid shadowing the builtin.
    (invoke-each): Replace current-processor-count with parallel-job-count.  The
    former would require importing (ice-9 threads).
    
    Change-Id: I7cde3305b9017bfec52ffe50ed124e21cbdceb25
---
 guix/build/guile-build-system.scm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/guix/build/guile-build-system.scm 
b/guix/build/guile-build-system.scm
index b497573c0a..d2198b6715 100644
--- a/guix/build/guile-build-system.scm
+++ b/guix/build/guile-build-system.scm
@@ -18,7 +18,7 @@
 
 (define-module (guix build guile-build-system)
   #:use-module ((guix build gnu-build-system) #:prefix gnu:)
-  #:use-module (guix build utils)
+  #:use-module ((guix build utils) #:hide (delete))
   #:use-module (srfi srfi-1)
   #:use-module (srfi srfi-26)
   #:use-module (ice-9 match)
@@ -79,7 +79,7 @@ determined."
      (setenv "GUIX_LOCPATH" (string-append locales "/lib/locale")))))
 
 (define* (invoke-each commands
-                      #:key (max-processes (current-processor-count))
+                      #:key (max-processes (parallel-job-count))
                       report-progress)
   "Run each command in COMMANDS in a separate process, using up to
 MAX-PROCESSES processes in parallel.  Call REPORT-PROGRESS at each step.

Reply via email to