1  /* { dg-do run } */
       2  /* { dg-options "-O3 -mpower8-vector -Wno-psabi" } */
       3  /* { dg-require-effective-target p8vector_hw } */
       4  
       5  #ifndef CHECK_H
       6  #define CHECK_H "sse2-check.h"
       7  #endif
       8  
       9  #include CHECK_H
      10  
      11  #ifndef TEST
      12  #define TEST sse2_test_pshufd_1
      13  #endif
      14  
      15  #define N 0xec
      16  
      17  #include <emmintrin.h>
      18  
      19  static __m128i
      20  __attribute__((noinline, unused))
      21  test (__m128i s1)
      22  {
      23    return _mm_shuffle_epi32 (s1, N); 
      24  }
      25  
      26  static void
      27  TEST (void)
      28  {
      29    union128i_d u, s1;
      30    int e[4] = { 0 };
      31    int i;
      32     
      33    s1.x = _mm_set_epi32 (16,15,14,13);
      34    u.x = test (s1.x);
      35  
      36    for (i = 0; i < 4; i++)
      37      e[i] = s1.a[((N & (0x3<<(2*i)))>>(2*i))];
      38  
      39    if (check_union128i_d(u, e))
      40      {
      41  #if DEBUG
      42        printf ("sse2_test_pshufd_1; check_union128i_d failed\n");
      43        printf ("\t ([%x,%x,%x,%x]) -> [%x,%x,%x,%x]\n", s1.a[0], s1.a[1],
      44  	      s1.a[2], s1.a[3], u.a[0], u.a[1], u.a[2], u.a[3]);
      45        printf ("\t expect [%x,%x,%x,%x]\n", e[0], e[1], e[2], e[3]);
      46  #endif
      47        abort ();
      48      }
      49  }