1 /* { dg-do run } */
2 /* { dg-options "-O3 -mpower8-vector -Wno-psabi" } */
3 /* { dg-require-effective-target lp64 } */
4 /* { dg-require-effective-target p8vector_hw } */
5
6 #ifndef CHECK_H
7 #define CHECK_H "sse2-check.h"
8 #endif
9
10 #include CHECK_H
11
12 #ifndef TEST
13 #define TEST sse2_test_pshuflw_1
14 #endif
15
16 #define N 0xec
17
18 #include <emmintrin.h>
19
20 static __m128i
21 __attribute__((noinline, unused))
test(__m128i s1)22 test (__m128i s1)
23 {
24 return _mm_shufflelo_epi16 (s1, N);
25 }
26
27 static void
TEST(void)28 TEST (void)
29 {
30 union128i_q s1;
31 union128i_w u;
32 short e[8] = { 0 };
33 int i;
34 int m1[4] = { 0x3, 0x3<<2, 0x3<<4, 0x3<<6 };
35 int m2[4];
36
37 s1.x = _mm_set_epi64x (0xabcde,0xef58a234);
38 u.x = test (s1.x);
39
40 for (i = 0; i < 4; i++)
41 e[i+4] = (s1.a[1]>>(16 * i)) & 0xffff;
42
43 for (i = 0; i < 4; i++)
44 m2[i] = (N & m1[i])>>(2*i);
45
46 for (i = 0; i < 4; i++)
47 e[i] = (s1.a[0] >> (16 * m2[i])) & 0xffff;
48
49 if (check_union128i_w(u, e))
50 #if DEBUG
51 {
52 union128i_w s;
53 s.x = s1.x;
54 printf ("sse2_test_pshuflw_1; check_union128i_w failed\n");
55 printf ("\t ([%hx,%hx,%hx,%hx, %hx,%hx,%hx,%hx])\n", s.a[0], s.a[1],
56 s.a[2], s.a[3], s.a[4], s.a[5], s.a[6], s.a[7]);
57 printf ("\t\t -> [%hx,%hx,%hx,%hx, %hx,%hx,%hx,%hx]\n", u.a[0], u.a[1],
58 u.a[2], u.a[3], u.a[4], u.a[5], u.a[6], u.a[7]);
59 printf ("\t expect [%hx,%hx,%hx,%hx, %hx,%hx,%hx,%hx]\n", e[0], e[1],
60 e[2], e[3], e[4], e[5], e[6], e[7]);
61 }
62 #else
63 abort ();
64 #endif
65 }
66