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

   1 /* { dg-do run } */
   2 /* { dg-options "-mavx512f -O2" } */
   3 /* { dg-require-effective-target avx512f } */
   4
   5 #define SIZE (128 / 32)
   6
   7 #include <math.h>
   8 #include "avx512f-check.h"
   9 #include "avx512f-helper.h"
  10 #include "avx512f-mask-type.h"
  11
  12 static void
  13 compute_vgetexpss (float *s, float *r)
  14 {
  15   int i;
  16   r[0] = floor (log (s[0]) / log (2));
  17   for(i = 1; i < SIZE; i++)
  18      r[i] = s[i];
  19 }
  20
  21 void static
  22 avx512f_test (void)
  23 {
  24   int i;
  25   union128 res1, res2, res3, res4, res5, res6, s1;
  26   MASK_TYPE mask = MASK_VALUE;
  27   float res_ref[SIZE];
  28
  29   for (i = 0; i < SIZE; i++)
  30     {
  31       s1.a[i] = 5.0 - i;
  32       res2.a[i] = DEFAULT_VALUE;
  33       res5.a[i] = DEFAULT_VALUE;
  34     }
  35
  36   res1.x = _mm_getexp_ss (s1.x, s1.x);
  37   res2.x = _mm_mask_getexp_ss (res2.x, mask, s1.x, s1.x);
  38   res3.x = _mm_maskz_getexp_ss (mask, s1.x, s1.x);
  39   res4.x = _mm_getexp_round_ss (s1.x, s1.x, _MM_FROUND_NO_EXC);
  40   res5.x = _mm_mask_getexp_round_ss (res5.x, mask, s1.x, s1.x, _MM_FROUND_NO_EXC);
  41   res6.x = _mm_maskz_getexp_round_ss (mask, s1.x, s1.x, _MM_FROUND_NO_EXC);
  42
  43   compute_vgetexpss (s1.a, res_ref);
  44
  45   if (check_fp_union128 (res1, res_ref))
  46     abort ();
  47
  48   MASK_MERGE () (res_ref, mask, 1);
  49   if (check_fp_union128 (res2, res_ref))
  50     abort ();
  51
  52   MASK_ZERO () (res_ref, mask, 1);
  53   if (check_fp_union128 (res3, res_ref))
  54     abort ();
  55
  56   compute_vgetexpss (s1.a, res_ref);
  57
  58   if (check_fp_union128 (res4, res_ref))
  59     abort ();
  60
  61   MASK_MERGE () (res_ref, mask, 1);
  62   if (check_fp_union128 (res5, res_ref))
  63     abort ();
  64
  65   MASK_ZERO () (res_ref, mask, 1);
  66   if (check_fp_union128 (res6, res_ref))
  67     abort ();
  68 }