From 1662fecb1c8c5a60d4ea93354cbac053c7f69ccc Mon Sep 17 00:00:00 2001 From: Miroslav Lichvar Date: Fri, 20 Jul 2018 10:54:56 +0200 Subject: [PATCH] disable failing floating-point test on ppc64le (#1604296) --- guile-ieeetest.patch | 19 +++++++++++++++++++ guile.spec | 4 ++++ 2 files changed, 23 insertions(+) create mode 100644 guile-ieeetest.patch diff --git a/guile-ieeetest.patch b/guile-ieeetest.patch new file mode 100644 index 0000000..392458c --- /dev/null +++ b/guile-ieeetest.patch @@ -0,0 +1,19 @@ +diff -up guile-2.0.14/test-suite/tests/bytevectors.test.orig guile-2.0.14/test-suite/tests/bytevectors.test +--- guile-2.0.14/test-suite/tests/bytevectors.test.orig 2018-07-20 10:53:26.644659326 +0200 ++++ guile-2.0.14/test-suite/tests/bytevectors.test 2018-07-20 10:52:50.668567335 +0200 +@@ -381,6 +381,7 @@ + (equal? (bytevector-ieee-single-ref b 0 (endianness little)) + (bytevector-ieee-single-ref b 4 (endianness big))))) + ++ #! + (pass-if "bytevector-ieee-single-{ref,set!} [unaligned]" + (let ((b (make-bytevector 9)) + (number 3.14)) +@@ -388,6 +389,7 @@ + (bytevector-ieee-single-set! b 5 number (endianness big)) + (equal? (bytevector-ieee-single-ref b 1 (endianness little)) + (bytevector-ieee-single-ref b 5 (endianness big))))) ++ !# + + (pass-if "double, little endian" + ;; http://bugs.gnu.org/11310 diff --git a/guile.spec b/guile.spec index 38ddd01..39cd354 100644 --- a/guile.spec +++ b/guile.spec @@ -18,6 +18,7 @@ Patch3: guile-threadstest.patch # Avoid linking all guile consumers to libgc # TODO: consider using: Requires.private: bdw-gc Patch4: guile-2.0.14-gc_pkgconfig_private.patch +Patch5: guile-ieeetest.patch %description GUILE (GNU's Ubiquitous Intelligent Language for Extension) is a library @@ -49,6 +50,9 @@ install the guile package. %patch2 -p1 -b .i18ntest %patch3 -p1 -b .threadstest %patch4 -p1 -b .gc_pkgconfig_private +%ifarch ppc64le +%patch5 -p1 -b .ieeetest +%endif %build