1  /* { dg-do run } */
       2  /* { dg-options "-O3 -mpower8-vector" } */
       3  /* { dg-require-effective-target p8vector_hw } */
       4  
       5  #define NO_WARN_X86_INTRINSICS 1
       6  #ifndef CHECK_H
       7  #define CHECK_H "mmx-check.h"
       8  #endif
       9  
      10  #ifndef TEST
      11  #define TEST mmx_test
      12  #endif
      13  
      14  #include CHECK_H
      15  
      16  #include <mmintrin.h>
      17  #include <xmmintrin.h>
      18  
      19  static __m64
      20  __attribute__((noinline, unused))
      21  test (__m64 s1, __m64 s2)
      22  {
      23    return _mm_packs_pi16 (s1, s2);
      24  }
      25  
      26  static signed char
      27  saturate (signed short val)
      28  {
      29    if (val > 127)
      30      return 127;
      31    else if (val < -128)
      32      return -128;
      33    else
      34      return val;
      35  }
      36  
      37  static void
      38  TEST (void)
      39  {
      40    __m64_union s1, s2;
      41    __m64_union u;
      42    __m64_union e;
      43    int i;
      44     
      45    s1.as_m64 = _mm_set_pi16 (2134, -128, 1234, 6354);
      46    s2.as_m64 = _mm_set_pi16 (41124, 234, 2344, 2354);
      47    u.as_m64 = test (s1.as_m64, s2.as_m64);
      48  
      49  #ifdef __LITTLE_ENDIAN__
      50    e.as_m64 = _mm_set_pi8 (saturate (_mm_extract_pi16 (s2.as_m64, 3)),
      51                            saturate (_mm_extract_pi16 (s2.as_m64, 2)),
      52                            saturate (_mm_extract_pi16 (s2.as_m64, 1)),
      53                            saturate (_mm_extract_pi16 (s2.as_m64, 0)),
      54                            saturate (_mm_extract_pi16 (s1.as_m64, 3)),
      55                            saturate (_mm_extract_pi16 (s1.as_m64, 2)),
      56                            saturate (_mm_extract_pi16 (s1.as_m64, 1)),
      57                            saturate (_mm_extract_pi16 (s1.as_m64, 0)));
      58  #else
      59    e.as_m64 = _mm_set_pi8 (saturate (_mm_extract_pi16 (s1.as_m64, 3)),
      60                            saturate (_mm_extract_pi16 (s1.as_m64, 2)),
      61                            saturate (_mm_extract_pi16 (s1.as_m64, 1)),
      62                            saturate (_mm_extract_pi16 (s1.as_m64, 0)),
      63                            saturate (_mm_extract_pi16 (s2.as_m64, 3)),
      64                            saturate (_mm_extract_pi16 (s2.as_m64, 2)),
      65                            saturate (_mm_extract_pi16 (s2.as_m64, 1)),
      66                            saturate (_mm_extract_pi16 (s2.as_m64, 0)));
      67  #endif
      68  
      69    if (u.as_m64 != e.as_m64)
      70      abort ();
      71  }