From: burnus Date: Sat, 4 Dec 2010 13:08:12 +0000 (+0000) Subject: 2010-12-04 Tobias Burnus X-Git-Tag: upstream/4.9.2~24383 X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=ee5a90d4400a2933babbea1fbf49543184368e7f;p=platform%2Fupstream%2Flinaro-gcc.git 2010-12-04 Tobias Burnus PR fortran/46584 * gfortran.dg/quad_1.f90: Remove some complex math checks as they fail on some non-libquadmath systems. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@167455 138bc75d-0d04-0410-961f-82ee72b054a4 --- diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index e48bf78..2cea754 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,10 @@ +2010-12-04 Tobias Burnus + + 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 PR fortran/46794 diff --git a/gcc/testsuite/gfortran.dg/quad_1.f90 b/gcc/testsuite/gfortran.dg/quad_1.f90 index 7d4322e..e75faac 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