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#define SIZE_HALF (AVX512F_LEN_HALF / 16) 12 13void 14CALC (short *r, int *s, int mem) 15{ 16 int i; 17 int len = mem ? SIZE : SIZE_HALF; 18 for (i = 0; i < len; i++) 19 { 20 r[i] = (i < SIZE) ? (short) s[i] : 0; 21 } 22} 23 24void 25TEST (void) 26{ 27 int i, sign; 28 UNION_TYPE (AVX512F_LEN_HALF, i_w) res1, res2, res3; 29 short res4[SIZE_HALF]; 30 UNION_TYPE (AVX512F_LEN, i_d) src; 31 MASK_TYPE mask = MASK_VALUE; 32 short res_ref[SIZE_HALF]; 33 short res_ref2[SIZE_HALF]; 34 35 sign = -1; 36 for (i = 0; i < SIZE; i++) 37 { 38 src.a[i] = 1 + 34 * i * sign; 39 sign = sign * -1; 40 res2.a[i] = DEFAULT_VALUE; 41 res4[i] = DEFAULT_VALUE; 42 } 43 44 for (i = SIZE; i < SIZE_HALF; i++) 45 { 46 res_ref2[i] = DEFAULT_VALUE * 2; 47 res4[i] = DEFAULT_VALUE * 2; 48 } 49 50 res1.x = INTRINSIC (_cvtepi32_epi16) (src.x); 51 res2.x = INTRINSIC (_mask_cvtepi32_epi16) (res2.x, mask, src.x); 52 res3.x = INTRINSIC (_maskz_cvtepi32_epi16) (mask, src.x); 53 CALC (res_ref, src.a, 0); 54 55 if (UNION_CHECK (AVX512F_LEN_HALF, i_w) (res1, res_ref)) 56 abort (); 57 58 MASK_MERGE (i_w) (res_ref, mask, SIZE); 59 if (UNION_CHECK (AVX512F_LEN_HALF, i_w) (res2, res_ref)) 60 abort (); 61 62 MASK_ZERO (i_w) (res_ref, mask, SIZE); 63 if (UNION_CHECK (AVX512F_LEN_HALF, i_w) (res3, res_ref)) 64 abort (); 65 66 INTRINSIC (_mask_cvtepi32_storeu_epi16) (res4, mask, src.x); 67 CALC (res_ref2, src.a, 1); 68 69 MASK_MERGE (i_w) (res_ref2, mask, SIZE); 70 if (checkVs (res4, res_ref2, SIZE_HALF)) 71 abort (); 72} 73