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 *s1, short *s2, short *r)
13{
14  int i;
15
16  for (i = 0; i < SIZE; ++i)
17    {
18      r[i] = ((unsigned short) s1[i]) << s2[i];
19    }
20}
21
22void
23TEST (void)
24{
25  UNION_TYPE (AVX512F_LEN, i_w) s1, s2, res1, res2, res3;
26  MASK_TYPE mask = MASK_VALUE;
27  short res_ref[SIZE];
28  int i, sign = 1;
29
30  for (i = 0; i < SIZE; i++)
31    {
32      s1.a[i] = i * sign;
33      s2.a[i] = i >> 2;
34      res2.a[i] = DEFAULT_VALUE;
35      sign = -sign;
36    }
37
38  res1.x = INTRINSIC (_sllv_epi16) (s1.x, s2.x);
39  res2.x = INTRINSIC (_mask_sllv_epi16) (res2.x, mask, s1.x, s2.x);
40  res3.x = INTRINSIC (_maskz_sllv_epi16) (mask, s1.x, s2.x);
41
42  CALC (s1.a, s2.a, res_ref);
43
44  if (UNION_CHECK (AVX512F_LEN, i_w) (res1, res_ref))
45    abort ();
46
47  MASK_MERGE (i_w) (res_ref, mask, SIZE);
48  if (UNION_CHECK (AVX512F_LEN, i_w) (res2, res_ref))
49    abort ();
50
51  MASK_ZERO (i_w) (res_ref, mask, SIZE);
52  if (UNION_CHECK (AVX512F_LEN, i_w) (res3, res_ref))
53    abort ();
54}
55