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

guix_mirror_bot pushed a commit to branch master
in repository guix.

The following commit(s) were added to refs/heads/master by this push:
     new 3a9f4e15ad gnu: uniutils: Fix build with gcc-14.
3a9f4e15ad is described below

commit 3a9f4e15adbe2551fecd15daf391b0478876a22b
Author: Andreas Enge <[email protected]>
AuthorDate: Sat Jul 26 12:32:26 2025 +0200

    gnu: uniutils: Fix build with gcc-14.
    
    * gnu/packages/textutils.scm (uniutils)[arguments]
    <#:configure-flags>: Add CFLAGS.
    <#:phases>{gcc14}: New phase.
    
    Change-Id: I7f8eddf584d5006b9be1a07ec5a48197b54884fe
---
 gnu/packages/textutils.scm | 16 +++++++++++++++-
 1 file changed, 15 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/textutils.scm b/gnu/packages/textutils.scm
index a54a763610..c693e043c4 100644
--- a/gnu/packages/textutils.scm
+++ b/gnu/packages/textutils.scm
@@ -506,9 +506,23 @@ useful when it is desired to reformat numbers.
         (base32 "0z4ibnd2zzya489vl84cfh82bmdwdhf0isf1myqwrs3s9s0vqyyn"))))
     (build-system gnu-build-system)
     (arguments
-     (list #:configure-flags #~(list "--disable-dependency-tracking")
+     (list #:configure-flags
+           #~(list "--disable-dependency-tracking"
+                   "CFLAGS=-g -O2 -Wno-error=implicit-int")
            #:phases
            #~(modify-phases %standard-phases
+               (add-before 'build 'gcc14
+                 (lambda _
+                   (substitute* "uniname.c"
+                     (("#include <unistd.h>" all)
+                       (string-append all "\n#include <ctype.h>")))
+                   (substitute* "unifuzz.c"
+                     (("#include <unistd.h>" all)
+                       (string-append all "\n#include <time.h>"))
+                     (("^Emit") "void Emit"))
+                   (substitute* "putu8.c"
+                     (("void" all)
+                       (string-append "#include <stdio.h>\n" all)))))
                (add-after 'build 'fix-paths
                  (lambda* (#:key outputs inputs #:allow-other-keys)
                    (let ((out (assoc-ref outputs "out"))

Reply via email to