mirror/guix
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2025-01-23 02:36:40 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: GHC: Disable test that fails with glibc 2.30 and later.

Browse source 
Fixes <https://bugs.gnu.org/39358>.

* gnu/packages/haskell.scm (ghc-8.6)[arguments]: Add substitution to disable
broken test.
This commit is contained in:
Marius Bakke 2020-03-23 19:42:56 +01:00
parent c711b6abdb
commit 2e9c43aa9a
No known key found for this signature in database
GPG key ID: A2A06DF2A33A54FA
1 changed files with 9 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
gnu/packages/haskell.scm
View file

@ -19,6 +19,7 @@
;;; Copyright © 2018, 2019 Gabriel Hondet <gabrielhondet@gmail.com> ;;; Copyright © 2018, 2019 Gabriel Hondet <gabrielhondet@gmail.com>
;;; Copyright © 2019 Robert Vollmert <rob@vllmrt.net> ;;; Copyright © 2019 Robert Vollmert <rob@vllmrt.net>
;;; Copyright © 2019 Jacob MacDonald <jaccarmac@gmail.com> ;;; Copyright © 2019 Jacob MacDonald <jaccarmac@gmail.com>
;;; Copyright © Marius Bakke <mbakke@fastmail.com>
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
;;; ;;;
@ -582,14 +583,20 @@ (define-public ghc-8.6
,make-flags)) ,make-flags))
((#:phases phases '%standard-phases) ((#:phases phases '%standard-phases)
`(modify-phases ,phases `(modify-phases ,phases
;; These two tests refer to the root user, which doesn't exist
;; (see <https://bugs.gnu.org/36692>).
(add-after 'unpack-testsuite 'skip-tests (add-after 'unpack-testsuite 'skip-tests
(lambda _ (lambda _
;; These two tests refer to the root user, which doesn't exist
;; (see <https://bugs.gnu.org/36692>).
(substitute* "libraries/unix/tests/all.T" (substitute* "libraries/unix/tests/all.T"
(("^test\\('T8108'") "# guix skipped: test('T8108'")) (("^test\\('T8108'") "# guix skipped: test('T8108'"))
(substitute* "libraries/unix/tests/libposix/all.T" (substitute* "libraries/unix/tests/libposix/all.T"
(("^test\\('posix010'") "# guix skipped: test('posix010'")) (("^test\\('posix010'") "# guix skipped: test('posix010'"))
;; This test attempts to dlopen() a position-independent
;; executable(!), which is disallowed since glibc 2.30. See
;; https://sourceware.org/bugzilla/show_bug.cgi?id=24323
(substitute* "testsuite/tests/dynlibs/Makefile"
(("\\./T13702a")
"# ./T13702a"))
#t)))))) #t))))))
(native-search-paths (list (search-path-specification (native-search-paths (list (search-path-specification
(variable "GHC_PACKAGE_PATH") (variable "GHC_PACKAGE_PATH")