http://gcc.gnu.org/bugzilla/show_bug.cgi?id=51057
Bug #: 51057
Summary: FAIL: gfortran.dg/quad_2.f90 -O0 execution test on
powerpc*-*-*
Classification: Unclassified
Product: gcc
Version: 4.7.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: testsuite
AssignedTo: unassig...@gcc.gnu.org
ReportedBy: domi...@lps.ens.fr
CC: bur...@net-b.de
Host: powerpc*-*-*
Target: powerpc*-*-*
Build: powerpc*-*-*
gfortran.dg/quad_2.f90 fails on powerpc*-*-* (see
http://gcc.gnu.org/ml/gcc-testresults/2011-11/msg00620.html ). This is due to a
less precise representation of REAL(16) on ppc (i.e., two REAL(8)) than on
Intel platforms. The following patch fixes the failure
--- /opt/gcc/work/gcc/testsuite/gfortran.dg/quad_2.f90 2011-11-06
20:55:43.000000000 +0100
+++ quad_2_db.f90 2011-11-09 14:06:48.000000000 +0100
@@ -48,8 +48,8 @@ program test_qp
case (16)
if (str1 /= " 1.00000000000000000000000000000000000") call abort()
if (str2 /= "1.00000000000000000000000000000000000") call abort()
- if (str3 /= " 1.41421356237309504880168872420969798") call abort()
- if (str4 /= "1.41421356237309504880168872420969798") call abort()
+ if (str3(1:37) /= " 1.41421356237309504880168872420969") call abort()
+ if (str4(1:34) /= "1.41421356237309504880168872420969") call abort()
block
real(qp), volatile :: fp2a
fp2a = 2.0_qp
