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 (u) / 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  }