diff options
| -rw-r--r-- | gcc/testsuite/ChangeLog | 7 | ||||
| -rw-r--r-- | gcc/testsuite/gfortran.dg/quad_1.f90 | 10 |
2 files changed, 13 insertions, 4 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index e48bf7818cf..2cea7546323 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -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 diff --git a/gcc/testsuite/gfortran.dg/quad_1.f90 b/gcc/testsuite/gfortran.dg/quad_1.f90 index 7d4322e5a74..e75faacdb4a 100644 --- a/gcc/testsuite/gfortran.dg/quad_1.f90 +++ b/gcc/testsuite/gfortran.dg/quad_1.f90 @@ -27,9 +27,11 @@ program test_qp 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 |