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))
test(__m64 s1,__m64 s2)22 test (__m64 s1, __m64 s2)
23 {
24 return _mm_packs_pu16 (s1, s2);
25 }
26
27 static unsigned char
saturate(signed short val)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
TEST(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 }
73