01/04: gnu: coreutils: Skip some tests on the 64bit Hurd.

[guix-commits]

janneke pushed a commit to branch hurd-team
in repository guix.

commit 0df32df834ebe2f2d936ff5299f82a1c1f3cd09a
Author: Janneke Nieuwenhuizen <janneke@gnu.org>
AuthorDate: Sun Nov 24 22:34:41 2024 +0100

    gnu: coreutils: Skip some tests on the 64bit Hurd.
    
    * gnu/packages/base.scm (coreutils)[arguments]: When building on the 64bit
    Hurd, skip some tests.
    
    Change-Id: If3c49971df03fb2b1e8dfae9b09d239fe5ec7a7e
---
 gnu/packages/base.scm | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)

diff --git a/gnu/packages/base.scm b/gnu/packages/base.scm
index cbce8bd634..afdea31aad 100644
--- a/gnu/packages/base.scm
+++ b/gnu/packages/base.scm
@@ -549,6 +549,22 @@ used to apply commands with arbitrarily long arguments.")
                                ;; here
                                ((" test-tls\\$\\(EXEEXT\\) ") " ")))
                            '())
+                     ,@(if (system-hurd64?)
+                           '((substitute*
+                                 ;; These tests fail
+                                 '("tests/misc/sort-NaN-infloop.sh"
+                                   "tests/misc/wc-parallel.sh")
+                               (("^#!.*" all)
+                                (string-append all "exit 77;\n")))
+                             (substitute* '("gnulib-tests/test-fdutimensat.c"
+                                            "gnulib-tests/test-futimens.c"
+                                            "gnulib-tests/test-linkat.c"
+                                            "gnulib-tests/test-renameat.c"
+                                            "gnulib-tests/test-renameatu.c"
+                                            "gnulib-tests/test-utimensat.c")
+                               (("(^| )main *\\(.*" all)
+                                (string-append all "{\n  exit (77);//"))))
+                           '())
                      (substitute* "Makefile.in"
                        ;; fails on filesystems where inotify cannot be used,
                        ;; more info in #47935