vect-120.c

   1 /* { dg-do compile } */
   2 /* { dg-require-effective-target vect_float } */
   3 /* { dg-require-effective-target vect_shift } */
   4
   5 static inline float
   6 i2f(int x)
   7 {
   8   union { float f; int i; } tmp;
   9   tmp.i=x;
  10   return tmp.f;
  11 }
  12 static inline float
  13 vect_ldexpf(float x, int n)
  14 {
  15   n = (n+0x7f)<<23;
  16   return x * i2f(n);
  17 }
  18
  19 float __attribute__ ((aligned(16))) a[1024];
  20 float __attribute__ ((aligned(16))) b[1024];
  21 float __attribute__ ((aligned(16))) c[1024];
  22
  23 void
  24 tV()
  25 {
  26   int i;
  27   for (i=0; i!=1024; ++i)
  28     {
  29       float z = a[i];
  30       int n = b[i];
  31       c[i] = vect_ldexpf(z,n);
  32     }
  33 }
  34
  35 /* { dg-final { scan-tree-dump-times "vectorized 1 loops" 1 "vect" } } */
  36 /* { dg-final { cleanup-tree-dump "vect" } } */