1/* { dg-do run } */
2/* { dg-options "-O2 -mavx512bw" } */
3/* { dg-require-effective-target avx512bw } */
4
5#define AVX512BW
6#include "avx512f-helper.h"
7
8#define SIZE (AVX512F_LEN / 16)
9#include "avx512f-mask-type.h"
10
11void
12CALC (short *r, short *s1, short *s2)
13{
14  int i;
15  for (i = 0; i < SIZE/8; i++)
16    {
17      r[8 * i] = s1[8 * i];
18      r[8 * i + 1] = s2[8 * i];
19      r[8 * i + 2] = s1[8 * i + 1];
20      r[8 * i + 3] = s2[8 * i + 1];
21      r[8 * i + 4] = s1[8 * i + 2];
22      r[8 * i + 5] = s2[8 * i + 2];
23      r[8 * i + 6] = s1[8 * i + 3];
24      r[8 * i + 7] = s2[8 * i + 3];
25    }
26}
27
28void
29TEST (void)
30{
31  int i, sign;
32  UNION_TYPE (AVX512F_LEN, i_w) res1, res2, res3, src1, src2;
33  MASK_TYPE mask = MASK_VALUE;
34  short res_ref[SIZE];
35
36  sign = -1;
37  for (i = 0; i < SIZE; i++)
38    {
39      src1.a[i] = 34 * i * sign;
40      src1.a[i] = 179 * i;
41      sign = sign * -1;
42    }
43  for (i = 0; i < SIZE; i++)
44    res2.a[i] = DEFAULT_VALUE;
45
46  res1.x = INTRINSIC (_unpacklo_epi16) (src1.x, src2.x);
47  res2.x = INTRINSIC (_mask_unpacklo_epi16) (res2.x, mask, src1.x, src2.x);
48  res3.x = INTRINSIC (_maskz_unpacklo_epi16) (mask, src1.x, src2.x);
49
50  CALC (res_ref, src1.a, src2.a);
51
52  if (UNION_CHECK (AVX512F_LEN, i_w) (res1, res_ref))
53    abort ();
54
55  MASK_MERGE (i_w) (res_ref, mask, SIZE);
56  if (UNION_CHECK (AVX512F_LEN, i_w) (res2, res_ref))
57    abort ();
58
59  MASK_ZERO (i_w) (res_ref, mask, SIZE);
60  if (UNION_CHECK (AVX512F_LEN, i_w) (res3, res_ref))
61    abort ();
62}
63