1 /* { dg-do run } */
2 /* { dg-require-effective-target ssse3 } */
3 /* { dg-options "-O2 -fno-strict-aliasing -mssse3" } */
4 
5 #ifndef CHECK_H
6 #define CHECK_H "ssse3-check.h"
7 #endif
8 
9 #ifndef TEST
10 #define TEST ssse3_test
11 #endif
12 
13 #include CHECK_H
14 #include "ssse3-vals.h"
15 
16 #include <tmmintrin.h>
17 
18 #ifndef __AVX__
19 /* Test the 64-bit form */
20 static void
ssse3_test_psignd(int * i1,int * i2,int * r)21 ssse3_test_psignd (int *i1, int *i2, int *r)
22 {
23   __m64 t1 = *(__m64 *) i1;
24   __m64 t2 = *(__m64 *) i2;
25   *(__m64 *) r = _mm_sign_pi32 (t1, t2);
26   _mm_empty ();
27 }
28 #endif
29 
30 /* Test the 128-bit form */
31 static void
ssse3_test_psignd128(int * i1,int * i2,int * r)32 ssse3_test_psignd128 (int *i1, int *i2, int *r)
33 {
34   /* Assumes incoming pointers are 16-byte aligned */
35   __m128i t1 = *(__m128i *) i1;
36   __m128i t2 = *(__m128i *) i2;
37   *(__m128i *)r = _mm_sign_epi32 (t1, t2);
38 }
39 
40 /* Routine to manually compute the results */
41 static void
compute_correct_result(int * i1,int * i2,int * r)42 compute_correct_result (int *i1, int *i2, int *r)
43 {
44   int i;
45 
46   for (i = 0; i < 4; i++)
47     if (i2[i] < 0)
48       r[i] = -i1[i];
49     else if (i2[i] == 0)
50       r[i] = 0;
51     else
52       r[i] = i1[i];
53 }
54 
55 static void
TEST(void)56 TEST (void)
57 {
58   int i;
59   int r [4] __attribute__ ((aligned(16)));
60   int ck [4];
61   int fail = 0;
62 
63   for (i = 0; i < 256; i += 8)
64     {
65       /* Manually compute the result */
66       compute_correct_result (&vals[i + 0], &vals[i + 4], ck);
67 
68 #ifndef __AVX__
69       /* Run the 64-bit tests */
70       ssse3_test_psignd (&vals[i + 0], &vals[i + 4], &r[0]);
71       ssse3_test_psignd (&vals[i + 2], &vals[i + 6], &r[2]);
72       fail += chk_128 (ck, r);
73 #endif
74 
75       /* Run the 128-bit tests */
76       ssse3_test_psignd128 (&vals[i + 0], &vals[i + 4], r);
77       fail += chk_128 (ck, r);
78     }
79 
80   if (fail != 0)
81     abort ();
82 }
83