2 /* { dg-options "-O2 -mavx512f" } */
3 /* { dg-require-effective-target avx512f } */
7 #include "avx512f-helper.h"
9 #define SIZE (AVX512F_LEN / 64)
10 #include "avx512f-mask-type.h"
13 CALC (long long *s1
, long long *s2
, long long *r
)
17 for (i
= 0; i
< SIZE
; i
++)
18 r
[i
] = (s1
[i
] >> s2
[i
]) | (s1
[i
] << (sizeof (s1
[i
]) * 8 - s2
[i
]));
24 UNION_TYPE (AVX512F_LEN
, i_q
) s1
, s2
, res1
, res2
, res3
;
25 MASK_TYPE mask
= MASK_VALUE
;
26 long long res_ref
[SIZE
];
29 for (i
= 0; i
< SIZE
; i
++)
33 res2
.a
[i
] = DEFAULT_VALUE
;
36 res1
.x
= INTRINSIC (_rorv_epi64
) (s1
.x
, s2
.x
);
37 res2
.x
= INTRINSIC (_mask_rorv_epi64
) (res2
.x
, mask
, s1
.x
, s2
.x
);
38 res3
.x
= INTRINSIC (_maskz_rorv_epi64
) (mask
, s1
.x
, s2
.x
);
40 CALC (s1
.a
, s2
.a
, res_ref
);
42 if (UNION_CHECK (AVX512F_LEN
, i_q
) (res1
, res_ref
))
45 MASK_MERGE (i_q
) (res_ref
, mask
, SIZE
);
46 if (UNION_CHECK (AVX512F_LEN
, i_q
) (res2
, res_ref
))
49 MASK_ZERO (i_q
) (res_ref
, mask
, SIZE
);
50 if (UNION_CHECK (AVX512F_LEN
, i_q
) (res3
, res_ref
))