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 / 32)
10#include "avx512f-mask-type.h"
11
12static void
13CALC (int *s1, int *s2, int *r)
14{
15  unsigned int i;
16
17  for (i = 0; i < SIZE; i++)
18    r[i] = (s1[i] >> s2[i]) | (s1[i] << (sizeof (s1[i]) * 8 - s2[i]));
19}
20
21void
22TEST (void)
23{
24  UNION_TYPE (AVX512F_LEN, i_d) s1, s2, res1, res2, res3;
25  MASK_TYPE mask = MASK_VALUE;
26  int res_ref[SIZE];
27  unsigned int i;
28
29  for (i = 0; i < SIZE; i++)
30    {
31      s1.a[i] = 137 * i;
32      s2.a[i] = (i + 7);
33      res2.a[i] = DEFAULT_VALUE;
34    }
35
36  res1.x = INTRINSIC (_rorv_epi32) (s1.x, s2.x);
37  res2.x = INTRINSIC (_mask_rorv_epi32) (res2.x, mask, s1.x, s2.x);
38  res3.x = INTRINSIC (_maskz_rorv_epi32) (mask, s1.x, s2.x);
39
40  CALC (s1.a, s2.a, res_ref);
41
42  if (UNION_CHECK (AVX512F_LEN, i_d) (res1, res_ref))
43    abort ();
44
45  MASK_MERGE (i_d) (res_ref, mask, SIZE);
46  if (UNION_CHECK (AVX512F_LEN, i_d) (res2, res_ref))
47    abort ();
48
49  MASK_ZERO (i_d) (res_ref, mask, SIZE);
50  if (UNION_CHECK (AVX512F_LEN, i_d) (res3, res_ref))
51    abort ();
52}
53