2 /* { dg-options "-O2 -mavx512f -std=gnu99" } */
3 /* { dg-require-effective-target avx512f } */
4 /* { dg-require-effective-target c99_runtime } */
8 #include "avx512f-helper.h"
10 #define SIZE (AVX512F_LEN / 32)
11 #include "avx512f-mask-type.h"
16 CALC (float *r
, float src
, int tbl
)
27 *r
= signbit (src
) ? -NAN
: NAN
;
39 *r
= signbit (src
) ? -INFINITY
: INFINITY
;
78 UNION_TYPE (AVX512F_LEN
,) res1
, res2
, res3
, s1
;
79 UNION_TYPE (AVX512F_LEN
, i_d
) s2
;
83 float vals
[2] = { -10, 10 };
84 int controls
[16] = { 0x11111111,
85 0x77777777, 0x88888888, 0x99999999,
86 0xaaaaaaaa, 0xbbbbbbbb, 0xcccccccc,
87 0x77777777, 0x88888888, 0x99999999,
88 0xaaaaaaaa, 0xbbbbbbbb, 0xcccccccc,
89 0xdddddddd, 0xeeeeeeee, 0xffffffff
92 MASK_TYPE mask
= MASK_VALUE
;
94 for (i
= 0; i
< 2; i
++)
96 for (j
= 0; j
< SIZE
; j
++)
99 s2
.a
[j
] = controls
[j
];
100 res1
.a
[j
] = DEFAULT_VALUE
;
101 res2
.a
[j
] = DEFAULT_VALUE
;
102 res3
.a
[j
] = DEFAULT_VALUE
;
104 CALC (&res_ref
[j
], s1
.a
[j
], s2
.a
[j
]);
107 res1
.x
= INTRINSIC (_fixupimm_ps
) (res1
.x
, s1
.x
, s2
.x
, 0);
108 res2
.x
= INTRINSIC (_mask_fixupimm_ps
) (res2
.x
, mask
, s1
.x
, s2
.x
, 0);
109 res3
.x
= INTRINSIC (_maskz_fixupimm_ps
) (mask
, res3
.x
, s1
.x
, s2
.x
, 0);
111 if (UNION_CHECK (AVX512F_LEN
,) (res1
, res_ref
))
114 MASK_MERGE() (res_ref
, mask
, SIZE
);
115 if (UNION_CHECK (AVX512F_LEN
,) (res2
, res_ref
))
117 MASK_ZERO() (res_ref
, mask
, SIZE
);
118 if (UNION_CHECK (AVX512F_LEN
,) (res3
, res_ref
))