gcc/testsuite/gcc.dg/vect/vect-float-truncate-1.c

   1 /* { dg-require-effective-target vect_double } */
   2 /* { dg-require-effective-target vect_float } */
   3
   4 #include <stdarg.h>
   5 #include "tree-vect.h"
   6
   7 #define N 32
   8
   9 __attribute__ ((noinline)) int
  10 main1 ()
  11 {
  12   int i;
  13   double db[N] = {0.4,3.5,6.6,9.4,12.5,15.6,18.4,21.5,24.6,27.4,30.5,33.6,36.4,39.5,42.6,45.4,0.5,3.6,6.4,9.5,12.6,15.4,18.5,21.6,24.4,27.5,30.6,33.4,36.5,39.6,42.4,45.5};
  14   float fa[N];
  15
  16   /* double -> float */
  17   for (i = 0; i < N; i++)
  18     {
  19       fa[i] = (float) db[i];
  20     }
  21
  22   /* check results:  */
  23   for (i = 0; i < N; i++)
  24     {
  25       if (fa[i] != (float) db[i])
  26        abort ();
  27     }
  28
  29   return 0;
  30 }
  31
  32 int
  33 main (void)
  34 {
  35   check_vect ();
  36
  37   return main1 ();
  38 }
  39
  40 /* { dg-final { scan-tree-dump-times "vectorized 1 loops" 1 "vect" { xfail spu*-*-* } } } */