gcc/testsuite/gcc.dg/vect/pr56933.c

   1 /* { dg-require-effective-target vect_double } */
   2
   3 #include "tree-vect.h"
   4
   5 extern void abort (void);
   6 void __attribute__((noinline,noclone))
   7 foo (double *b, double *d, double *f)
   8 {
   9   int i;
  10   for (i = 0; i < 1024; i++)
  11     {
  12       d[2*i] = 2. * d[2*i];
  13       d[2*i+1] = 4. * d[2*i+1];
  14       b[i] = d[2*i] - 1.;
  15       f[i] = d[2*i+1] + 2.;
  16     }
  17 }
  18 int main()
  19 {
  20   double b[1024], d[2*1024], f[1024];
  21   int i;
  22
  23   check_vect ();
  24
  25   for (i = 0; i < 2*1024; i++)
  26     d[i] = 1.;
  27   foo (b, d, f);
  28 #pragma GCC novector
  29   for (i = 0; i < 1024; i+= 2)
  30     {
  31       if (d[2*i] != 2.)
  32         abort ();
  33       if (d[2*i+1] != 4.)
  34         abort ();
  35     }
  36 #pragma GCC novector
  37   for (i = 0; i < 1024; i++)
  38     {
  39       if (b[i] != 1.)
  40         abort ();
  41       if (f[i] != 6.)
  42         abort ();
  43     }
  44   return 0;
  45 }
  46