mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-12-24 05:18:07 -05:00
gnu: grep: Update hanging and failing tests on the Hurd.
* gnu/packages/base.scm (grep)[arguments]: When building natively on the Hurd, remove Rename phase 'skip-triple-backref-test' to 'skip-tests'. Remove "tests/triple-backref" as it now passes. Add the hanging "tests/hash-collision-perf" test, and the failing "tests/file" test.
This commit is contained in:
parent
e4721f7472
commit
f719a4086c
1 changed files with 10 additions and 14 deletions
|
@ -134,21 +134,17 @@ (define-public grep
|
|||
(string-append bin "/fgrep"))
|
||||
(("^exec grep")
|
||||
(string-append "exec " bin "/grep"))))))
|
||||
,@(if (target-hurd?)
|
||||
'((add-before 'check 'skip-triple-backref-test
|
||||
,@(if (system-hurd?)
|
||||
'((add-before 'check 'skip-test
|
||||
(lambda _
|
||||
;; This test is marked as malfunctioning on glibc systems
|
||||
;; due to
|
||||
;; <https://sourceware.org/bugzilla/show_bug.cgi?id=11053>
|
||||
;; and it triggers a segfault with glibc 2.33 on GNU/Hurd.
|
||||
;; Skip it.
|
||||
(substitute* "tests/triple-backref"
|
||||
(("^warn_" all)
|
||||
(string-append "exit 77\n" all))))))
|
||||
'()))
|
||||
#:make-flags ,(if (target-hurd?)
|
||||
''("XFAIL_TESTS=test-perror2 equiv-classes") ;XXX
|
||||
''())))
|
||||
(substitute*
|
||||
;; This test hangs
|
||||
'("tests/hash-collision-perf"
|
||||
;; This test fails
|
||||
"tests/file")
|
||||
(("^#!.*" all)
|
||||
(string-append all "exit 77;\n"))))))
|
||||
'()))))
|
||||
(synopsis "Print lines matching a pattern")
|
||||
(description
|
||||
"grep is a tool for finding text inside files. Text is found by
|
||||
|
|
Loading…
Reference in a new issue