OSDN Git Service

2005-02-15 Eric Christopher <echristo@redhat.com>
[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gcc.dg / rs6000-ldouble-2.c
1 /* { dg-do run { target powerpc*-*-darwin* powerpc*-*-aix* powerpc64-*-linux rs6000-*-* } } */
2 /* { dg-options "-mlong-double-128" } */
3
4 /* Check that LDBL_EPSILON is right for 'long double'.  */
5
6 #include <float.h>
7
8 extern void abort (void);
9
10 int main(void)
11 {
12   volatile long double ee = 1.0;
13   long double eps = ee;
14   while (ee + 1.0 != 1.0)
15     {
16       eps = ee;
17       ee = eps / 2;
18     }
19   if (eps != LDBL_EPSILON)
20     abort ();
21   return 0;
22 }