From f814fa878ce7cbace3e78b8b1b8e3503cc4977a8 Mon Sep 17 00:00:00 2001
From: Kaelyn <kaelyn.alexi@protonmail.com>
Date: Mon, 10 Apr 2023 18:33:47 +0000
Subject: gnu: autogen: Fix build on i686.

* gnu/packages/autogen.scm (autogen): Add a snippet.

Signed-off-by: Andreas Enge <andreas@enge.fr>
---
 gnu/packages/autogen.scm | 14 ++++++++++----
 1 file changed, 10 insertions(+), 4 deletions(-)

(limited to 'gnu/packages')

diff --git a/gnu/packages/autogen.scm b/gnu/packages/autogen.scm
index 9751e11a64..f9575b0dc9 100644
--- a/gnu/packages/autogen.scm
+++ b/gnu/packages/autogen.scm
@@ -3,6 +3,7 @@
 ;;; Copyright © 2015, 2016 Efraim Flashner <efraim@flashner.co.il>
 ;;; Copyright © 2018, 2019 Tobias Geerinckx-Rice <me@tobias.gr>
 ;;; Copyright © 2020 Marius Bakke <mbakke@fastmail.com>
+;;; Copyright © 2023 Kaelyn Takata <kaelyn.alexi@protonmail.com>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -43,10 +44,15 @@
         (base32 "16mlbdys8q4ckxlvxyhwkdnh1ay9f6g0cyp1kylkpalgnik398gq"))
        (modules '((guix build utils)))
        (snippet
-        ;; Address '-Werror=format-overflow' error.
-        '(substitute* "getdefs/getdefs.c"
-           (("def_bf\\[[[:space:]]*MAXNAMELEN[[:space:]]*\\]")
-            "def_bf[MAXNAMELEN + 10]")))))
+        '(begin
+           ;; Address '-Werror=format-overflow' error.
+           (substitute* "getdefs/getdefs.c"
+             (("def_bf\\[[[:space:]]*MAXNAMELEN[[:space:]]*\\]")
+              "def_bf[MAXNAMELEN + 10]"))
+           ;; Address '-Werror=format-truncation' error on i686.
+           (substitute* "autoopts/usage.c"
+             (("vfmt\\[sizeof\\(vfmtfmt\\)\\]")
+              "vfmt[sizeof(vfmtfmt) + 6]"))))))
     (build-system gnu-build-system)
     (native-inputs (list pkg-config which))
     (inputs (list guile-3.0 perl))          ; for doc generator mdoc
-- 
cgit v1.2.3