30/60: gnu: Add m4-boot.

[guix-commits]

efraim pushed a commit to branch wip-riscv-bootstrap
in repository guix.

commit f0e649459cd0f91c1e78419104447f47bc0de710
Author: Ekaitz Zarraga <ekaitz@elenq.tech>
AuthorDate: Mon Oct 7 18:45:59 2024 +0300

    gnu: Add m4-boot.
    
    * gnu/packages/commencement.scm (m4-boot): New variable.
    
    Co-authored-by: Efraim Flashner <efraim@flashner.co.il>
    Change-Id: Ic04b8b9ba7e273fe0607428b91d50e548f800aa1
---
 gnu/packages/commencement.scm | 28 ++++++++++++++++++++++++++++
 1 file changed, 28 insertions(+)

diff --git a/gnu/packages/commencement.scm b/gnu/packages/commencement.scm
index 4bb3f8f9b0..eed1d0208e 100644
--- a/gnu/packages/commencement.scm
+++ b/gnu/packages/commencement.scm
@@ -1570,6 +1570,34 @@ ac_cv_c_float_format='IEEE (little-endian)'
     ,@(fold alist-delete (%boot-mesboot0-inputs)
             '("binutils" "make"))))
 
+(define m4-boot
+  (package
+    (inherit m4)
+    (name "m4-boot")
+    (version "1.4.18")
+    (source (origin
+              (method url-fetch)
+              (uri (string-append "mirror://gnu/m4/m4-" version ".tar.gz"))
+              (sha256
+               (base32 
"1arz972zxmwhnyik9007g6ww9gars8d55xbvg548xlsw3a9369mb"))))
+    (native-inputs (if (target-x86?)
+                       (%boot-mesboot1-inputs)
+                       (%boot-tcc-musl-inputs)))
+    (inputs '())
+    (propagated-inputs '())
+    (arguments
+     (list
+       #:tests? #f
+       #:guile %bootstrap-guile
+       #:implicit-inputs? #f
+       #:parallel-build? (target-x86?)
+       #:configure-flags
+       #~(list #$@(if (target-x86?)
+                      #~()
+                      #~("CC=tcc"))
+               (string-append "--build=" #$(commencement-build-target))
+               (string-append "--host=" #$(commencement-build-target)))))))
+
 (define gmp-boot
   (let ((version "4.3.2"))
     (origin