gnu/dist/gcc4/gcc/testsuite/gcc.dg/vect/fast-math-vect-reduc-7.c

   1 /* { dg-require-effective-target vect_double } */
   2
   3 /* need -funsafe-math-optimizations to vectorize the summation.
   4    also need -ffinite-math-only to create the min/max expr.  */
   5
   6 #include <stdarg.h>
   7 #include "tree-vect.h"
   8
   9 #define N 16
  10 #define DIFF 242
  11
  12 int main1 (double x, double max_result)
  13 {
  14   int i;
  15   double b[N] = {0,3,6,9,12,15,18,21,24,27,30,33,36,39,42,45};
  16   double c[N] = {0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15};
  17   double diff = 2;
  18   double max = x;
  19   double min = 10;
  20
  21   for (i = 0; i < N; i++) {
  22     diff += (b[i] - c[i]);
  23   }
  24
  25   for (i = 0; i < N; i++) {
  26     max = max < c[i] ? c[i] : max;
  27   }
  28
  29   for (i = 0; i < N; i++) {
  30     min = min > c[i] ? c[i] : min;
  31   }
  32
  33   /* check results:  */
  34   if (diff != DIFF)
  35     abort ();
  36   if (max != max_result)
  37     abort ();
  38   if (min != 0)
  39     abort ();
  40
  41   return 0;
  42 }
  43
  44 int main (void)
  45 {
  46   check_vect ();
  47
  48   main1 (100, 100);
  49   main1 (0, 15);
  50   return 0;
  51 }
  52
  53 /* { dg-final { scan-tree-dump-times "vectorized 3 loops" 1 "vect" } } */
  54 /* { dg-final { cleanup-tree-dump "vect" } } */