janneke pushed a commit to branch hurd-team
in repository guix.
commit 86a9ff0068ac21d4fa340f450f0835fa840111b2
Author: Janneke Nieuwenhuizen <[email protected]>
AuthorDate: Wed May 31 11:18:32 2023 +0200
gnu: guile: Skip hanging and failing pipe tests on the Hurd.
* gnu/packages/guile.scm (guile-3.0)[arguments]: When building on the Hurd,
add stage 'disable-popen.test-open-pipe' to avoid running the
open-input-pipe test (hangs) and open-output-pipe test (fails.
---
gnu/packages/guile.scm | 9 +++++++++
1 file changed, 9 insertions(+)
diff --git a/gnu/packages/guile.scm b/gnu/packages/guile.scm
index 48bee600a9..ed20c1dfbc 100644
--- a/gnu/packages/guile.scm
+++ b/gnu/packages/guile.scm
@@ -378,6 +378,15 @@ without requiring the source code to be rewritten.")
(search-patch "guile-hurd-posix-spawn.patch")))
(invoke "patch" "--force" "-p1" "-i" patch))))
#~())
+ #$@(if (system-hurd?)
+ #~((add-after 'unpack 'disable-popen.test-no-duplicate
+ ;; This test hangs on the Hurd.
+ (lambda _
+ (substitute* "test-suite/tests/popen.test"
+ (("\\(pass-if \"no duplicate\".*" all)
+ (string-append all " (when (string-ci=
\"GNU\" (vector-ref (uname) 0)) (throw 'unresolved))
+"))))))
+ #~())
#$@(if (target-ppc32?)
#~((add-after 'unpack 'adjust-bootstrap-flags
(lambda _
