This is the mail archive of the gcc-patches@gcc.gnu.org mailing list for the GCC project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

[PATCH]gfortran.dg/bessel_7.f90: Bump allowed precision to avoid failure on s390.


The attached patch fixes a bessel_7 fortran test failure that appeared during
SLES 12 distro tests for s390x - by bumping the error tolerance.

The same patch should apply to gcc-4.9 and gcc-4.8.

ChangeLog:
--
2014-08-25  Dominik Vogt  <vogt@linux.vnet.ibm.com>

        * gfortran.dg/bessel_7.f90: Bump allowed precision to avoid
        failure on s390*-*-linux-gnu.
--

P.S.: Please do not commit this patch; one of my colleagues with
the proper clearances needs to do that.

Ciao

Dominik ^_^  ^_^

-- 

Dominik Vogt
IBM Germany
>From 217f52fd87cb817fec9f8802e70bfec3454a9409 Mon Sep 17 00:00:00 2001
From: Dominik Vogt <vogt@linux.vnet.ibm.com>
Date: Mon, 25 Aug 2014 10:47:49 +0100
Subject: [PATCH 1/2] gfortran.dg/bessel_7.f90: Bump allowed precision to avoid
 failure on s390.

Problem reappeared during SLES 12 testing for s390.
---
 gcc/testsuite/gfortran.dg/bessel_7.f90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/gcc/testsuite/gfortran.dg/bessel_7.f90 b/gcc/testsuite/gfortran.dg/bessel_7.f90
index 7e63ed1..c6b5f74 100644
--- a/gcc/testsuite/gfortran.dg/bessel_7.f90
+++ b/gcc/testsuite/gfortran.dg/bessel_7.f90
@@ -16,7 +16,7 @@
 implicit none
 real,parameter :: values(*) = [0.0, 0.5, 1.0, 0.9, 1.8,2.0,3.0,4.0,4.25,8.0,34.53, 475.78] 
 real,parameter :: myeps(size(values)) = epsilon(0.0) &
-                  * [2, 3, 4, 5, 8, 2, 12, 6, 7, 6, 36, 168 ]
+                  * [2, 3, 4, 5, 8, 2, 13, 6, 7, 6, 36, 168 ]
 ! The following is sufficient for me - the values above are a bit
 ! more tolerant
 !                  * [0, 0, 0, 3, 3, 0, 9, 0, 2, 1, 22, 130 ]
-- 
1.8.4.2


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]