2 /* { dg-options "-O2 -mavx512f -mavx512bw -mavx512vbmi2" } */
3 /* { dg-require-effective-target avx512f } */
4 /* { dg-require-effective-target avx512vbmi2 } */
9 #include "avx512f-helper.h"
11 #define SIZE (AVX512F_LEN / 64)
13 #include "avx512f-mask-type.h"
16 CALC (long long *r
, long long *dst
, long long *s1
, long long *s2
)
19 for (i
= 0; i
< SIZE
; i
++)
21 r
[i
] = (dst
[i
] >> (s2
[i
] & 63)) | (s1
[i
] << (64 - (s2
[i
] & 63)));
29 UNION_TYPE (AVX512F_LEN
, i_q
) res1
, res2
, res3
, src1
, src2
;
30 MASK_TYPE mask
= MASK_VALUE
;
31 long long res_ref
[SIZE
];
33 for (i
= 0; i
< SIZE
; i
++)
39 for (i
= 0; i
< SIZE
; i
++)
41 res1
.a
[i
] = DEFAULT_VALUE
;
42 res2
.a
[i
] = DEFAULT_VALUE
;
43 res3
.a
[i
] = DEFAULT_VALUE
;
46 CALC (res_ref
, res1
.a
, src1
.a
, src2
.a
);
48 res1
.x
= INTRINSIC (_shrdv_epi64
) (res1
.x
, src1
.x
, src2
.x
);
49 res2
.x
= INTRINSIC (_mask_shrdv_epi64
) (res2
.x
, mask
, src1
.x
, src2
.x
);
50 res3
.x
= INTRINSIC (_maskz_shrdv_epi64
) (mask
, res3
.x
, src1
.x
, src2
.x
);
52 if (UNION_CHECK (AVX512F_LEN
, i_q
) (res1
, res_ref
))
55 MASK_MERGE (i_q
) (res_ref
, mask
, SIZE
);
56 if (UNION_CHECK (AVX512F_LEN
, i_q
) (res2
, res_ref
))
59 MASK_ZERO (i_q
) (res_ref
, mask
, SIZE
);
60 if (UNION_CHECK (AVX512F_LEN
, i_q
) (res3
, res_ref
))