ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-25 13:58:15 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: guile: Skip hanging and failing pipe tests on the Hurd.

Browse source 
* 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.
This commit is contained in:
Janneke Nieuwenhuizen 2023-05-31 11:18:32 +02:00
parent d4306847bf
commit 360c8873ff
No known key found for this signature in database
GPG key ID: F3C1A0D9C1D65273
1 changed files with 13 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

13
gnu/packages/guile.scm
View file

@ -378,6 +378,19 @@ (define patch
(search-patch "guile-hurd-posix-spawn.patch"))) (search-patch "guile-hurd-posix-spawn.patch")))
(invoke "patch" "--force" "-p1" "-i" 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
(object->string
'(when (string-ci= "GNU"
(vector-ref (uname) 0))
(throw 'unresolved)))))))))
#~())
#$@(if (target-ppc32?) #$@(if (target-ppc32?)
#~((add-after 'unpack 'adjust-bootstrap-flags #~((add-after 'unpack 'adjust-bootstrap-flags
(lambda _ (lambda _