gcc/testsuite/gcc.target/i386/xop-frczX.c

   1 /* { dg-do run } */
   2 /* { dg-require-effective-target xop } */
   3 /* { dg-options "-O2 -mxop" } */
   4
   5 #include "xop-check.h"
   6
   7 #include <x86intrin.h>
   8
   9 void
  10 check_mm_vmfrcz_sd (__m128d __A, __m128d __B)
  11 {
  12   union128d a, b, c;
  13   double d[2];
  14
  15   a.x = __A;
  16   b.x = __B;
  17   c.x = _mm_frcz_sd (__A, __B);
  18   d[0] = b.a[0] - (int)b.a[0] ;
  19   d[1] = a.a[1];
  20   if (check_union128d (c, d))
  21     abort ();
  22 }
  23
  24 void
  25 check_mm_vmfrcz_ss (__m128 __A, __m128 __B)
  26 {
  27   union128 a, b, c;
  28   float f[4];
  29
  30   a.x = __A;
  31   b.x = __B;
  32   c.x = _mm_frcz_ss (__A, __B);
  33   f[0] = b.a[0] - (int)b.a[0] ;
  34   f[1] = a.a[1];
  35   f[2] = a.a[2];
  36   f[3] = a.a[3];
  37   if (check_union128 (c, f))
  38     abort ();
  39 }
  40
  41 static void
  42 xop_test (void)
  43 {
  44   union128 a, b;
  45   union128d c,d;
  46   int i;
  47
  48   for (i = 0; i < 4; i++)
  49     {
  50        a.a[i] = i + 3.5;
  51        b.a[i] = i + 7.9;
  52     }
  53   for (i = 0; i < 2; i++)
  54     {
  55        c.a[i] = i + 3.5;
  56        d.a[i] = i + 7.987654321;
  57     }
  58   check_mm_vmfrcz_ss (a.x, b.x);
  59   check_mm_vmfrcz_sd (c.x, d.x);
  60 }