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