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  
       7  #ifndef CHECK_H
       8  #define CHECK_H "mmx-check.h"
       9  #endif
      10  
      11  #ifndef TEST
      12  #define TEST mmx_test
      13  #endif
      14  
      15  #include CHECK_H
      16  
      17  #include <mmintrin.h>
      18  #include <xmmintrin.h>
      19  
      20  static __m64
      21  __attribute__((noinline, unused))
      22  test (__m64 s1, __m64 s2)
      23  {
      24    return _mm_packs_pu16 (s1, s2);
      25  }
      26  
      27  static unsigned char
      28  saturate (signed short val)
      29  {
      30    if (val > 255)
      31      return 255;
      32    else if (val < 0)
      33      return 0;
      34    else
      35      return val;
      36  }
      37  
      38  static void
      39  TEST (void)
      40  {
      41    __m64_union s1, s2;
      42    __m64_union u;
      43    __m64_union e;
      44    int i, tmp;
      45     
      46    s1.as_m64 = _mm_set_pi16 (1, 2, 3, 4);
      47    s2.as_m64 = _mm_set_pi16 (-9, -10, -11, -12);
      48    u.as_m64 = test (s1.as_m64, s2.as_m64);
      49  
      50  #ifdef __LITTLE_ENDIAN__
      51    e.as_m64 = _mm_set_pi8 (saturate (_mm_extract_pi16 (s2.as_m64, 3)),
      52                            saturate (_mm_extract_pi16 (s2.as_m64, 2)),
      53                            saturate (_mm_extract_pi16 (s2.as_m64, 1)),
      54                            saturate (_mm_extract_pi16 (s2.as_m64, 0)),
      55                            saturate (_mm_extract_pi16 (s1.as_m64, 3)),
      56                            saturate (_mm_extract_pi16 (s1.as_m64, 2)),
      57                            saturate (_mm_extract_pi16 (s1.as_m64, 1)),
      58                            saturate (_mm_extract_pi16 (s1.as_m64, 0)));
      59  #else
      60    e.as_m64 = _mm_set_pi8 (saturate (_mm_extract_pi16 (s1.as_m64, 3)),
      61                            saturate (_mm_extract_pi16 (s1.as_m64, 2)),
      62                            saturate (_mm_extract_pi16 (s1.as_m64, 1)),
      63                            saturate (_mm_extract_pi16 (s1.as_m64, 0)),
      64                            saturate (_mm_extract_pi16 (s2.as_m64, 3)),
      65                            saturate (_mm_extract_pi16 (s2.as_m64, 2)),
      66                            saturate (_mm_extract_pi16 (s2.as_m64, 1)),
      67                            saturate (_mm_extract_pi16 (s2.as_m64, 0)));
      68  #endif
      69  
      70    if (u.as_m64 != e.as_m64)
      71      abort ();
      72  }