/* { dg-do run } */ /* { dg-options "-O3 -mvsx" } */ /* { dg-additional-options "-mdejagnu-cpu=power8" { target { ! has_arch_pwr8 } } } */ /* { dg-require-effective-target p8vector_hw } */ #define NO_WARN_X86_INTRINSICS 1 #ifndef CHECK_H #define CHECK_H "mmx-check.h" #endif #ifndef TEST #define TEST mmx_test #endif #include CHECK_H #include #include static __m64 __attribute__((noinline, unused)) test (__m64 s1, __m64 s2) { return _mm_packs_pu16 (s1, s2); } static unsigned char saturate (signed short val) { if (val > 255) return 255; else if (val < 0) return 0; else return val; } static void TEST (void) { __m64_union s1, s2; __m64_union u; __m64_union e; int i, tmp; s1.as_m64 = _mm_set_pi16 (1, 2, 3, 4); s2.as_m64 = _mm_set_pi16 (-9, -10, -11, -12); u.as_m64 = test (s1.as_m64, s2.as_m64); #ifdef __LITTLE_ENDIAN__ e.as_m64 = _mm_set_pi8 (saturate (_mm_extract_pi16 (s2.as_m64, 3)), saturate (_mm_extract_pi16 (s2.as_m64, 2)), saturate (_mm_extract_pi16 (s2.as_m64, 1)), saturate (_mm_extract_pi16 (s2.as_m64, 0)), saturate (_mm_extract_pi16 (s1.as_m64, 3)), saturate (_mm_extract_pi16 (s1.as_m64, 2)), saturate (_mm_extract_pi16 (s1.as_m64, 1)), saturate (_mm_extract_pi16 (s1.as_m64, 0))); #else e.as_m64 = _mm_set_pi8 (saturate (_mm_extract_pi16 (s1.as_m64, 3)), saturate (_mm_extract_pi16 (s1.as_m64, 2)), saturate (_mm_extract_pi16 (s1.as_m64, 1)), saturate (_mm_extract_pi16 (s1.as_m64, 0)), saturate (_mm_extract_pi16 (s2.as_m64, 3)), saturate (_mm_extract_pi16 (s2.as_m64, 2)), saturate (_mm_extract_pi16 (s2.as_m64, 1)), saturate (_mm_extract_pi16 (s2.as_m64, 0))); #endif if (u.as_m64 != e.as_m64) abort (); }