aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGeoffrey Keating <geoffk@apple.com>2004-01-10 05:52:56 +0000
committerGeoffrey Keating <geoffk@gcc.gnu.org>2004-01-10 05:52:56 +0000
commit1a7a2c0f0de31f7ec54b51df6ee80da9d076dc70 (patch)
treee36b2c0d62b85e07a94cc414ba41bc4ecc0c5664
parentb39f1868240db95ac3ffa7239cb28cfa1d65f065 (diff)
downloadgcc-1a7a2c0f0de31f7ec54b51df6ee80da9d076dc70.zip
gcc-1a7a2c0f0de31f7ec54b51df6ee80da9d076dc70.tar.gz
gcc-1a7a2c0f0de31f7ec54b51df6ee80da9d076dc70.tar.bz2
* gcc.dg/rs6000-ldouble-1.c: New.
From-SVN: r75631
-rw-r--r--gcc/testsuite/ChangeLog4
-rw-r--r--gcc/testsuite/gcc.dg/rs6000-ldouble-1.c23
2 files changed, 27 insertions, 0 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 0d4b3d6..d98af87 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,7 @@
+2004-01-09 Geoffrey Keating <geoffk@apple.com>
+
+ * gcc.dg/rs6000-ldouble-1.c: New.
+
2004-01-10 Giovanni Bajo <giovannibajo@gcc.gnu.org>
DR 337
diff --git a/gcc/testsuite/gcc.dg/rs6000-ldouble-1.c b/gcc/testsuite/gcc.dg/rs6000-ldouble-1.c
new file mode 100644
index 0000000..52d2da8
--- /dev/null
+++ b/gcc/testsuite/gcc.dg/rs6000-ldouble-1.c
@@ -0,0 +1,23 @@
+/* { dg-do run { target powerpc*-*-darwin* powerpc*-*-aix* powerpc64-*-linux rs6000-*-* } } */
+/* { dg-options "-mlong-double-128" } */
+
+/* Check that long double values are rounded correctly when being converted
+ to 32-bit integers. All these values are of the form +/- 2 +/- 2^-60. */
+
+int main(void)
+{
+ long double l1 = 1.9999999999999999991326382620115964527941L;
+ long double l2 = 2.0000000000000000008673617379884035472059L;
+ long double l3 = -2.0000000000000000008673617379884035472059L;
+ long double l4 = -1.9999999999999999991326382620115964527941L;
+
+ if ((int) l1 != 1)
+ abort ();
+ if ((int) l2 != 2)
+ abort ();
+ if ((int) l3 != -2)
+ abort ();
+ if ((int) l4 != -1)
+ abort ();
+ exit (0);
+}