gcc/testsuite/gcc.target/i386/avx512f-vcvtpd2udq-2.c

   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 SRC_SIZE ((AVX512F_LEN) / 64)
  10 #include "avx512f-mask-type.h"
  11 #define DST_SIZE ((AVX512F_LEN_HALF) / 32)
  12
  13 static void
  14 CALC (double *s, unsigned *r)
  15 {
  16   int i;
  17
  18   for (i = 0; i < SRC_SIZE; i++)
  19     {
  20       r[i] = (unsigned) (s[i] + 0.5);
  21     }
  22   for (i = SRC_SIZE; i < DST_SIZE; i++)
  23     {
  24       r[i] = 0;
  25     }
  26 }
  27
  28 void
  29 TEST (void)
  30 {
  31   UNION_TYPE (AVX512F_LEN, d) s;
  32   UNION_TYPE (AVX512F_LEN_HALF, i_ud) res1, res2, res3;
  33   MASK_TYPE mask = MASK_VALUE;
  34   unsigned res_ref[DST_SIZE] = { 0 };
  35   int i;
  36
  37   for (i = 0; i < SRC_SIZE; i++)
  38     {
  39       s.a[i] = 123.456 * (i + 2000);
  40     }
  41
  42   for (i = 0; i < DST_SIZE; i++)
  43     res2.a[i] = DEFAULT_VALUE;
  44
  45   res1.x = INTRINSIC (_cvtpd_epu32) (s.x);
  46   res2.x = INTRINSIC (_mask_cvtpd_epu32) (res2.x, mask, s.x);
  47   res3.x = INTRINSIC (_maskz_cvtpd_epu32) (mask, s.x);
  48
  49   CALC (s.a, res_ref);
  50
  51   if (UNION_CHECK (AVX512F_LEN_HALF, i_ud) (res1, res_ref))
  52     abort ();
  53
  54   MASK_MERGE (i_ud) (res_ref, mask, SRC_SIZE);
  55   if (UNION_CHECK (AVX512F_LEN_HALF, i_ud) (res2, res_ref))
  56     abort ();
  57
  58   MASK_ZERO (i_ud) (res_ref, mask, SRC_SIZE);
  59   if (UNION_CHECK (AVX512F_LEN_HALF, i_ud) (res3, res_ref))
  60     abort ();
  61 }