guix_mirror_bot pushed a commit to branch core-packages-team
in repository guix.

commit de7375f130dfc8461e09b85d0c8fe27ade1de8a0
Author: Nicolas Graves <[email protected]>
AuthorDate: Tue Feb 17 15:23:57 2026 +0100

    gnu: %boot-mesboot-core-inputs: Drop input labels.
    
    * gnu/packages/commencement.scm
    (%boot-mesboot-core-inputs): Drop input labels.
    (glibc-mesboot0, gcc-mesboot0)[native-inputs]: Drop input-labels.
    (%boot-mesboot0-inputs): Inject former %boot-mesboot-core-inputs for
    incremental progress on input label removal.
    
    Change-Id: I5428eaeb85cf82de3b9fd2fc46bd1075babc0ad3
    Signed-off-by: Ludovic Courtès <[email protected]>
---
 gnu/packages/commencement.scm | 35 ++++++++++++++++++-----------------
 1 file changed, 18 insertions(+), 17 deletions(-)

diff --git a/gnu/packages/commencement.scm b/gnu/packages/commencement.scm
index e19ad86dde0..a6607500696 100644
--- a/gnu/packages/commencement.scm
+++ b/gnu/packages/commencement.scm
@@ -1056,15 +1056,9 @@ ac_cv_c_float_format='IEEE (little-endian)'
             (files '("lib")))))))
 
 (define (%boot-mesboot-core-inputs)
-  `(("binutils" ,binutils-mesboot0)
-    ("gcc" ,gcc-core-mesboot0)
-    ("gzip" ,gzip-mesboot)
-    ("patch" ,patch-mesboot)
-    ("make" ,gnu-make-mesboot0)
-    ("bash" , gash-boot)               ;gnu-build-system used to expect "bash"
-    ("coreutils" , gash-utils-boot)
-    ("bootar" ,bootar)
-    ("guile" ,%bootstrap-guile)))
+  (cons* binutils-mesboot0
+         gcc-core-mesboot0
+         (delete tcc-boot (%boot-tcc-inputs))))
 
 (define mesboot-headers
   (package
@@ -1114,8 +1108,7 @@ ac_cv_c_float_format='IEEE (little-endian)'
     (supported-systems '("i686-linux" "x86_64-linux"))
     (inputs '())
     (propagated-inputs '())
-    (native-inputs `(("headers" ,mesboot-headers)
-                     ,@(%boot-mesboot-core-inputs)))
+    (native-inputs (cons* mesboot-headers (%boot-mesboot-core-inputs)))
     (outputs '("out"))
     (arguments
      (list
@@ -1186,11 +1179,12 @@ ac_cv_c_float_format='IEEE (little-endian)'
   (package
     (inherit gcc-core-mesboot0)
     (name "gcc-mesboot0")
-    (native-inputs `(;; Packages are given in an order that's relevant for
-                     ;; #include_next purposes.
-                     ("libc" ,glibc-mesboot0)
-                     ("kernel-headers" ,%bootstrap-linux-libre-headers)
-                     ,@(%boot-mesboot-core-inputs)))
+    (native-inputs
+     ;; Packages are given in an order that's relevant for
+     ;; #include_next purposes.
+     (cons* glibc-mesboot0
+            %bootstrap-linux-libre-headers
+            (%boot-mesboot-core-inputs)))
     (arguments
      (substitute-keyword-arguments arguments
        ((#:phases phases)
@@ -1231,7 +1225,14 @@ ac_cv_c_float_format='IEEE (little-endian)'
   `(("gcc" ,gcc-mesboot0)
     ("kernel-headers" ,%bootstrap-linux-libre-headers)
     ("libc" ,glibc-mesboot0)
-    ,@(alist-delete "gcc" (%boot-mesboot-core-inputs))))
+    ("binutils" ,binutils-mesboot0)
+    ("gzip" ,gzip-mesboot)
+    ("patch" ,patch-mesboot)
+    ("make" ,gnu-make-mesboot0)
+    ("bash" , gash-boot)               ;gnu-build-system used to expect "bash"
+    ("coreutils" , gash-utils-boot)
+    ("bootar" ,bootar)
+    ("guile" ,%bootstrap-guile)))
 
 (define binutils-mesboot1
   (package

Reply via email to