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  
      12  static void
      13  CALC (int *r, int *s1, long long *s2)
      14  {
      15    int i;
      16    int count = s2[0];
      17    for (i = 0; i < SIZE; i++)
      18      {
      19        r[i] =
      20  	count < 32 ? (s1[i] >> count) : (s1[i] > 0 ? 0 : 0xFFFFFFFF);
      21      }
      22  }
      23  
      24  void
      25  TEST (void)
      26  {
      27    int i, sign;
      28    UNION_TYPE (AVX512F_LEN, i_d) res1, res2, res3, src1;
      29    UNION_TYPE (128, i_q) src2;
      30    MASK_TYPE mask = MASK_VALUE;
      31    int res_ref[SIZE];
      32  
      33    long long imm;
      34    sign = -1;
      35    for (i = 0; i < SIZE; i++)
      36      {
      37        src1.a[i] = 2 + sign * 7 * i % 291;
      38        sign = sign * -1;
      39      }
      40  
      41    for (imm = 1; imm <= 33; imm++)
      42      {
      43        src2.a[0] = imm;
      44        for (i = 0; i < SIZE; i++)
      45  	res2.a[i] = DEFAULT_VALUE;
      46  
      47        res1.x = INTRINSIC (_sra_epi32) (src1.x, src2.x);
      48        res2.x =
      49  	INTRINSIC (_mask_sra_epi32) (res2.x, mask, src1.x, src2.x);
      50        res3.x = INTRINSIC (_maskz_sra_epi32) (mask, src1.x, src2.x);
      51  
      52        CALC (res_ref, src1.a, src2.a);
      53  
      54        if (UNION_CHECK (AVX512F_LEN, i_d) (res1, res_ref))
      55  	abort ();
      56  
      57        MASK_MERGE (i_d) (res_ref, mask, SIZE);
      58        if (UNION_CHECK (AVX512F_LEN, i_d) (res2, res_ref))
      59  	abort ();
      60  
      61        MASK_ZERO (i_d) (res_ref, mask, SIZE);
      62        if (UNION_CHECK (AVX512F_LEN, i_d) (res3, res_ref))
      63  	abort ();
      64      }
      65  }