diff options
| author | Jakub Jelinek <jakub@redhat.com> | 2007-01-05 16:49:05 +0100 |
|---|---|---|
| committer | Jakub Jelinek <jakub@gcc.gnu.org> | 2007-01-05 16:49:05 +0100 |
| commit | 698ac9345ab418493fed8f97902f23fe6ddec3f8 (patch) | |
| tree | d22bdbbd927716ab77625c5086c5bc05222af12c /gcc | |
| parent | 2220652d3f79f773fb25b4d21ea4cbf4406d1df2 (diff) | |
| download | gcc-698ac9345ab418493fed8f97902f23fe6ddec3f8.zip gcc-698ac9345ab418493fed8f97902f23fe6ddec3f8.tar.gz gcc-698ac9345ab418493fed8f97902f23fe6ddec3f8.tar.bz2 | |
re PR c/30360 (Complex divide bug)
PR c/30360
* libgcc2.c (__divdc3): Compare c and d against 0.0 instead of
denom against 0.0.
* gcc.dg/pr30360.c: New test.
From-SVN: r120486
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/ChangeLog | 6 | ||||
| -rw-r--r-- | gcc/libgcc2.c | 2 | ||||
| -rw-r--r-- | gcc/testsuite/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/testsuite/gcc.dg/pr30360.c | 25 |
4 files changed, 37 insertions, 1 deletions
diff --git a/gcc/ChangeLog b/gcc/ChangeLog index a8b31ca..c894c72 100644 --- a/gcc/ChangeLog +++ b/gcc/ChangeLog @@ -1,3 +1,9 @@ +2007-01-05 Jakub Jelinek <jakub@redhat.com> + + PR c/30360 + * libgcc2.c (__divdc3): Compare c and d against 0.0 instead of + denom against 0.0. + 2007-01-05 Joel Brobecker <brobecker@adacore.com> * doc/install.texi (Final install): Document the fact that diff --git a/gcc/libgcc2.c b/gcc/libgcc2.c index b78b8f6..8c0c9d1 100644 --- a/gcc/libgcc2.c +++ b/gcc/libgcc2.c @@ -1909,7 +1909,7 @@ CONCAT3(__div,MODE,3) (MTYPE a, MTYPE b, MTYPE c, MTYPE d) are nonzero/zero, infinite/finite, and finite/infinite. */ if (isnan (x) && isnan (y)) { - if (denom == 0.0 && (!isnan (a) || !isnan (b))) + if (c == 0.0 && d == 0.0 && (!isnan (a) || !isnan (b))) { x = COPYSIGN (INFINITY, c) * a; y = COPYSIGN (INFINITY, c) * b; diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 49786c5..4636099 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2007-01-05 Jakub Jelinek <jakub@redhat.com> + + PR c/30360 + * gcc.dg/pr30360.c: New test. + 2007-01-05 Paul Thomas <pault@gcc.gnu.org> PR fortran/23232 diff --git a/gcc/testsuite/gcc.dg/pr30360.c b/gcc/testsuite/gcc.dg/pr30360.c new file mode 100644 index 0000000..d4dae0d --- /dev/null +++ b/gcc/testsuite/gcc.dg/pr30360.c @@ -0,0 +1,25 @@ +/* PR c/30360 */ +/* { dg-do run { target i?86-*-linux* x86_64-*-linux* ia64-*-linux* s390*-*-linux* } } */ +/* { dg-options "-O2 -std=gnu99" } */ + +#define I (__extension__ 1.0iF) +#define H(x) asm ("" : "=m" (x) : "m" (x)) +extern void abort (void); + +int +main (void) +{ + _Complex double a = 1.0 + 1.0 * I, b = 0.0, c; + H (a); + H (b); + c = a / b; + if (!__builtin_isinf (__real__ c) && !__builtin_isinf (__imag__ c)) + abort (); + a = 0.0; + H (a); + H (b); + c = a / b; + if (!__builtin_isnan (__real__ c) || !__builtin_isnan (__imag__ c)) + abort (); + return 0; +} |