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"
14 CALC (double *s
, double *r
)
17 for (i
= 0; i
< SIZE
; i
++)
18 r
[i
] = floor (log (s
[i
]) / log (2));
25 UNION_TYPE (AVX512F_LEN
, d
) res1
, res2
, res3
, s
;
28 MASK_TYPE mask
= MASK_VALUE
;
30 for (j
= 0; j
< SIZE
; j
++)
32 s
.a
[j
] = j
* (j
+ 12.0231);
33 res1
.a
[j
] = DEFAULT_VALUE
;
34 res2
.a
[j
] = DEFAULT_VALUE
;
35 res3
.a
[j
] = DEFAULT_VALUE
;
38 res1
.x
= INTRINSIC (_getexp_pd
) (s
.x
);
39 res2
.x
= INTRINSIC (_mask_getexp_pd
) (res2
.x
, mask
, s
.x
);
40 res3
.x
= INTRINSIC (_maskz_getexp_pd
) (mask
, s
.x
);
43 if (UNION_CHECK (AVX512F_LEN
, d
) (res1
, res_ref
))
46 MASK_MERGE(d
) (res_ref
, mask
, SIZE
);
48 if (UNION_CHECK (AVX512F_LEN
, d
) (res2
, res_ref
))
51 MASK_ZERO(d
) (res_ref
, mask
, SIZE
);
53 if (UNION_CHECK (AVX512F_LEN
, d
) (res3
, res_ref
))