diff mbox

[committed,Fortran] Disable complex checks in gfortran.dg/quad_1.f90

Message ID 4CFA3D45.4030002@net-b.de
State New
Headers show

Commit Message

Tobias Burnus Dec. 4, 2010, 1:08 p.m. UTC 
The quad_1.f90 checks test the highest available floating point type. 
This works with libquadmath but it fails on systems with REAL(16) 
matching "long double" if the system's libm does not implement the C99 
complex math functions.

The simple solution is to disable those functions, which I did now.

Committed as Rev. 167455

Tobias
diff mbox

Patch

Index: gcc/testsuite/gfortran.dg/quad_1.f90
===================================================================
--- gcc/testsuite/gfortran.dg/quad_1.f90	(Revision 167454)
+++ gcc/testsuite/gfortran.dg/quad_1.f90	(Arbeitskopie)
@@ -27,9 +27,11 @@ 
 
    print *, z
    print *, PI*cmplx(0.0_qp, 1.0_qp)
-   print *, 16*atan(0.2_QP)-4*atan(Z1/239)
-   print *, sin(z)
-   print *, cos(z)
-   print *, sinh(z) ! asinh not implemented, cf. PR 46416
+! Disable the complex functions as not all "long-double" systems have
+! a libm with those C99 functions. (libquadmath had), cf. PR 46584
+!   print *, 16*atan(0.2_QP)-4*atan(Z1/239)
+!   print *, sin(z)
+!   print *, cos(z)
+!   print *, sinh(z) ! asinh not implemented in libquadmath, cf. PR 46416
    print *, precision(z)
 end program test_qp
Index: gcc/testsuite/ChangeLog
===================================================================
--- gcc/testsuite/ChangeLog	(Revision 167454)
+++ gcc/testsuite/ChangeLog	(Arbeitskopie)
@@ -1,3 +1,10 @@ 
+2010-12-04  Tobias Burnus  <burnus@net-b.de>
+
+	PR fortran/46584
+	* gfortran.dg/quad_1.f90: Remove some complex
+	math checks as they fail on some non-libquadmath
+	systems.
+
 2010-12-04  Daniel Kraft  <d@domob.eu>
 
 	PR fortran/46794