1 /* { dg-do run } */
2 /* { dg-options "-O2 -mavx512dq" } */
3 /* { dg-require-effective-target avx512dq } */
4
5 #define AVX512DQ
6 #include "avx512f-helper.h"
7
8 #define SIZE (AVX512F_LEN / 64)
9 #include "avx512f-mask-type.h"
10
11 void
CALC(double * s,long long * r)12 CALC (double *s, long long *r)
13 {
14 int i;
15
16 for (i = 0; i < SIZE; i++)
17 {
18 r[i] = (s[i] >= 0) ? (long long) (s[i] + 0.5)
19 : (long long) (s[i] - 0.5);
20 }
21 }
22
23 void
TEST(void)24 TEST (void)
25 {
26 UNION_TYPE (AVX512F_LEN, d) s;
27 UNION_TYPE (AVX512F_LEN, i_q) res1, res2, res3;
28 MASK_TYPE mask = MASK_VALUE;
29 long long res_ref[SIZE];
30 int i, sign = 1;
31
32 for (i = 0; i < SIZE; i++)
33 {
34 s.a[i] = 123.456 * (i + 2000) * sign;
35 res2.a[i] = DEFAULT_VALUE;
36 sign = -sign;
37 }
38
39 res1.x = INTRINSIC (_cvtpd_epi64) (s.x);
40 res2.x = INTRINSIC (_mask_cvtpd_epi64) (res2.x, mask, s.x);
41 res3.x = INTRINSIC (_maskz_cvtpd_epi64) (mask, s.x);
42
43 CALC (s.a, res_ref);
44
45 if (UNION_CHECK (AVX512F_LEN, i_q) (res1, res_ref))
46 abort ();
47
48 MASK_MERGE (i_q) (res_ref, mask, SIZE);
49 if (UNION_CHECK (AVX512F_LEN, i_q) (res2, res_ref))
50 abort ();
51
52 MASK_ZERO (i_q) (res_ref, mask, SIZE);
53 if (UNION_CHECK (AVX512F_LEN, i_q) (res3, res_ref))
54 abort ();
55 }
56