1 /* { dg-do run } */
2 /* { dg-options "-O2 -mavx512f" } */
3 /* { dg-require-effective-target avx512f } */
4
5 #define AVX512F
6
7 #include "avx512f-helper.h"
8
9 #define SIZE ((AVX512F_LEN) / 64)
10 #include "avx512f-mask-type.h"
11 #define ALIGN ((AVX512F_LEN) / 8)
12
13 void
TEST(void)14 TEST (void)
15 {
16 UNION_TYPE (AVX512F_LEN, d) s2, s3, res1, res3, res4, res5, res6;
17 MASK_TYPE mask = MASK_VALUE;
18 double s1[SIZE] __attribute__ ((aligned (ALIGN)));
19 double res2[SIZE] __attribute__ ((aligned (ALIGN)));
20 double res7[SIZE] __attribute__ ((aligned (ALIGN)));
21 int i, sign = 1;
22
23 for (i = 0; i < SIZE; i++)
24 {
25 s1[i] = 12.34 * (i + 2000) * sign;
26 s2.a[i] = 56.78 * (i - 30) * sign;
27 s3.a[i] = 90.12 * (i + 40) * sign;
28 res3.a[i] = DEFAULT_VALUE;
29 res5.a[i] = DEFAULT_VALUE;
30 res7[i] = DEFAULT_VALUE;
31 sign = -sign;
32 }
33
34 #if AVX512F_LEN == 512
35 res1.x = INTRINSIC (_load_pd) (s1);
36 INTRINSIC (_store_pd) (res2, s2.x);
37 #endif
38 res3.x = INTRINSIC (_mask_mov_pd) (res3.x, mask, s3.x);
39 res4.x = INTRINSIC (_maskz_mov_pd) (mask, s3.x);
40 res5.x = INTRINSIC (_mask_load_pd) (res5.x, mask, s1);
41 res6.x = INTRINSIC (_maskz_load_pd) (mask, s1);
42 INTRINSIC (_mask_store_pd) (res7, mask, s2.x);
43
44 #if AVX512F_LEN == 512
45 if (UNION_CHECK (AVX512F_LEN, d) (res1, s1))
46 abort ();
47
48 if (UNION_CHECK (AVX512F_LEN, d) (s2, res2))
49 abort ();
50 #endif
51
52 MASK_MERGE (d) (s3.a, mask, SIZE);
53 if (checkVd (res3.a, s3.a, SIZE))
54 abort ();
55
56 MASK_ZERO (d) (s3.a, mask, SIZE);
57 if (checkVd (res4.a, s3.a, SIZE))
58 abort ();
59
60 MASK_MERGE (d) (s1, mask, SIZE);
61 if (UNION_CHECK (AVX512F_LEN, d) (res5, s1))
62 abort ();
63
64 MASK_ZERO (d) (s1, mask, SIZE);
65 if (UNION_CHECK (AVX512F_LEN, d) (res6, s1))
66 abort ();
67
68 MASK_MERGE (d) (s2.a, mask, SIZE);
69 if (UNION_CHECK (AVX512F_LEN, d) (s2, res7))
70 abort ();
71 }
72