gcc/testsuite/gcc.target/i386/sse2-lrint-vec.c

   1 /* { dg-do run } */
   2 /* { dg-options "-O2 -ffast-math -ftree-vectorize -msse2" } */
   3
   4 #include "sse2-check.h"
   5
   6 extern long lrint (double);
   7
   8 #define N 32
   9
  10 static void
  11 sse2_test (void)
  12 {
  13   double a[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   long r[N];
  15
  16   int i;
  17
  18   for (i = 0; i < N; i++)
  19     {
  20       r[i] = lrint (a[i]);
  21     }
  22
  23   /* check results:  */
  24   for (i = 0; i < N; i++)
  25     {
  26       if (r[i] != lrint (a[i]))
  27         abort();
  28     }
  29 }