01/02: squash! gawk-mesboot0: int rs; no check.

[guix-commits]

janneke pushed a commit to branch wip-arm-bootstrap
in repository guix.

commit 5b7dd9d1c349bd47a3babc43f7ad701fcc24f030
Author: Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
AuthorDate: Mon Dec 28 18:57:31 2020 +0100

    squash! gawk-mesboot0: int rs; no check.
---
 gnu/packages/commencement.scm | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/commencement.scm b/gnu/packages/commencement.scm
index ac52504..d486f76 100644
--- a/gnu/packages/commencement.scm
+++ b/gnu/packages/commencement.scm
@@ -1415,7 +1415,10 @@ ac_cv_c_float_format='IEEE (little-endian)'
                  ((" -lm ") " "))
                (substitute* "test/Makefile.in"
                  (("^bigtest:.*") "bigtest: basic\n")
-                 (("( |\t)(childin|convfmt|fflush|longwrds|math|negexp)" all 
sep) sep))))
+                 (("( |\t)(childin|convfmt|fflush|longwrds|math|negexp)" all 
sep) sep))
+               (substitute* "io.c"
+                 (("char rs;") "int rs;"))
+               #t))
            (add-before 'configure 'setenv
              (lambda _
                (let* ((out (assoc-ref %outputs "out"))
@@ -1438,6 +1441,9 @@ ac_cv_c_float_format='IEEE (little-endian)'
                  (format (current-error-port) "running ./configure ~a\n" 
(string-join configure-flags))
                  (system* "touch" "configure") ; aclocal.m4 is newer than 
configure
                  (apply invoke (cons "./configure" configure-flags)))))
+         (replace 'check
+           (lambda _
+             (invoke "./gawk" "--version")))
            (replace 'install
              (lambda* (#:key outputs #:allow-other-keys)
                (let* ((out (assoc-ref outputs "out"))