gcc/testsuite/gcc.target/i386/sse4_1-init-v4sf-1.c

   1 /* { dg-do run } */
   2 /* { dg-require-effective-target sse4 } */
   3 /* { dg-options "-O2 -msse4.1" } */
   4
   5 #include "sse4_1-check.h"
   6
   7 #ifdef DEBUG
   8 #include <stdio.h>
   9 #endif
  10
  11 #include <emmintrin.h>
  12
  13 static void
  14 __attribute__((noinline))
  15 check (__m128 x, float *v, int j)
  16 {
  17   union
  18     {
  19       __m128 x;
  20       float f[4];
  21     } u;
  22   unsigned int i;
  23
  24   u.x = x;
  25
  26   for (i = 0; i < sizeof (v) / sizeof (v[0]); i++)
  27     if (i == j)
  28       {
  29         if (v[i] != u.f[i])
  30           {
  31 #ifdef DEBUG
  32             printf ("%i: %f != %f\n", i, v[i], u.f[i]);
  33 #endif
  34             abort ();
  35           }
  36       }
  37     else if (u.f[i] != 0)
  38       {
  39 #ifdef DEBUG
  40         printf ("%i: %f != 0\n", i, u.f[i]);
  41 #endif
  42         abort ();
  43       }
  44 }
  45
  46 static void
  47 __attribute__((noinline))
  48 test (float *v)
  49 {
  50   __m128 x;
  51
  52   x = _mm_set_ps (0, 0, 0, v[0]);
  53   check (x, v, 0);
  54   x = _mm_set_ps (0, 0, v[1], 0);
  55   check (x, v, 1);
  56   x = _mm_set_ps (0, v[2], 0, 0);
  57   check (x, v, 2);
  58   x = _mm_set_ps (v[3], 0, 0, 0);
  59   check (x, v, 3);
  60 }
  61
  62 static void
  63 sse4_1_test (void)
  64 {
  65   float v[4] = { -3, 2, 1, 9 };
  66   test (v);
  67 }