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

[guix-commits]

mbakke pushed a commit to branch core-updates
in repository guix.

commit 2e9c43aa9adac2bd6bcf92373d1cf9f322afa5a3
Author: Marius Bakke <address@hidden>
AuthorDate: Mon Mar 23 19:42:56 2020 +0100

    gnu: GHC: Disable test that fails with glibc 2.30 and later.
    
    Fixes <https://bugs.gnu.org/39358>.
    
    * gnu/packages/haskell.scm (ghc-8.6)[arguments]: Add substitution to disable
    broken test.
---
 gnu/packages/haskell.scm | 11 +++++++++--
 1 file changed, 9 insertions(+), 2 deletions(-)

diff --git a/gnu/packages/haskell.scm b/gnu/packages/haskell.scm
index 6e9cfc6..8a33263 100644
--- a/gnu/packages/haskell.scm
+++ b/gnu/packages/haskell.scm
@@ -19,6 +19,7 @@
 ;;; Copyright © 2018, 2019 Gabriel Hondet <address@hidden>
 ;;; Copyright © 2019 Robert Vollmert <address@hidden>
 ;;; Copyright © 2019 Jacob MacDonald <address@hidden>
+;;; Copyright © Marius Bakke <address@hidden>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -582,14 +583,20 @@ interactive environment for the functional language 
Haskell.")
                ,make-flags))
        ((#:phases phases '%standard-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
              (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"
                  (("^test\\('T8108'") "# guix skipped: test('T8108'"))
                (substitute* "libraries/unix/tests/libposix/all.T"
                  (("^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))))))
     (native-search-paths (list (search-path-specification
                                 (variable "GHC_PACKAGE_PATH")