gnu/dist/gcc4/gcc/testsuite/gcc.dg/tree-ssa/pr23115.c

   1 /* { dg-do run } */
   2 /* { dg-options "-O2 -ftree-vectorize" } */
   3
   4 extern void abort (void);
   5
   6 #define MIN2(a,b) (((a)<(b)) ? (a) : (b))
   7 #define MAX2(a,b) (((a)>(b)) ? (a) : (b))
   8
   9 double p[2] = { 4., 5. };
  10
  11 int main()
  12 {
  13   long j;
  14   double R, n, x;
  15
  16   n = 1.e300;
  17   x = -1.e300;
  18   for( j=0; j < 2; j++ )
  19     {
  20       x = MAX2(x,p[j]);
  21       n = MIN2(n,p[j]);
  22     }
  23   R = x-n;
  24
  25   if( R < 0.1 )
  26       abort ();
  27
  28   return 0;
  29 }