04/06: gnu: SeaBIOS: Build in parallel.

[guix-commits]

mbakke pushed a commit to branch master
in repository guix.

commit 145aa7f04b1c61e52f61bca039350e898e20aac8
Author: Marius Bakke <marius@gnu.org>
AuthorDate: Mon Dec 19 07:46:47 2022 +0100

    gnu: SeaBIOS: Build in parallel.
    
    * gnu/packages/firmware.scm (seabios)[arguments]: Use N-PAR-FOR-EACH to 
build
    the various targets.
---
 gnu/packages/firmware.scm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/firmware.scm b/gnu/packages/firmware.scm
index 79d4442487..7239b85cb2 100644
--- a/gnu/packages/firmware.scm
+++ b/gnu/packages/firmware.scm
@@ -426,6 +426,7 @@ executing in M-mode.")
       #~'("EXTRAVERSION=-guix"          ;upstream wants distros to set this
           "V=1")                        ;build verbosely
       #:modules `(,@%gnu-build-system-modules
+                  (ice-9 threads)
                   (ice-9 match))
       #:phases
       #~(modify-phases %standard-phases
@@ -477,7 +478,7 @@ executing in M-mode.")
                        ("isavga" . ("VGA_BOCHS=y" "VGA_PCI=n"))
                        ("ramfb"  . ("VGA_RAMFB=y" "VGA_PCI=n")))))
                 (mkdir "out")
-                (for-each
+                (n-par-for-each (parallel-job-count)
                  (match-lambda
                    ((target . config)
                     (let* ((dot-config (string-append (getcwd) "/" target