Add AMD SSE5 support; Add iterator over function arguments; Add stdarg_p, prototype_p...
[official-gcc.git] / gcc / testsuite / gcc.target / i386 / sse5-hsubX.c
blob03c7f79084e9f94b7c296af9aed2f1650b910d2f
1 /* { dg-do run { target i?86-*-* x86_64-*-* } } */
2 /* { dg-require-effective-target sse5 } */
3 /* { dg-options "-O2 -msse5" } */
5 #include "sse5-check.h"
7 #include <bmmintrin.h>
8 #include <string.h>
10 #define NUM 10
12 union
14 __m128i x[NUM];
15 int8_t ssi[NUM * 16];
16 int16_t si[NUM * 8];
17 int32_t li[NUM * 4];
18 int64_t lli[NUM * 2];
19 } dst, res, src1;
21 static void
22 init_sbyte ()
24 int i;
25 for (i=0; i < NUM * 16; i++)
26 src1.ssi[i] = i;
29 static void
30 init_sword ()
32 int i;
33 for (i=0; i < NUM * 8; i++)
34 src1.si[i] = i;
38 static void
39 init_sdword ()
41 int i;
42 for (i=0; i < NUM * 4; i++)
43 src1.li[i] = i;
46 static int
47 check_sbyte2word ()
49 int i, j, s, t, check_fails = 0;
50 for (i = 0; i < NUM * 16; i = i + 16)
52 for (j = 0; j < 8; j++)
54 t = i + (2 * j);
55 s = (i / 2) + j;
56 res.si[s] = src1.ssi[t] - src1.ssi[t + 1] ;
57 if (res.si[s] != dst.si[s])
58 check_fails++;
63 static int
64 check_sword2dword ()
66 int i, j, s, t, check_fails = 0;
67 for (i = 0; i < (NUM * 8); i = i + 8)
69 for (j = 0; j < 4; j++)
71 t = i + (2 * j);
72 s = (i / 2) + j;
73 res.li[s] = src1.si[t] - src1.si[t + 1] ;
74 if (res.li[s] != dst.li[s])
75 check_fails++;
80 static int
81 check_dword2qword ()
83 int i, j, s, t, check_fails = 0;
84 for (i = 0; i < (NUM * 4); i = i + 4)
86 for (j = 0; j < 2; j++)
88 t = i + (2 * j);
89 s = (i / 2) + j;
90 res.lli[s] = src1.li[t] - src1.li[t + 1] ;
91 if (res.lli[s] != dst.lli[s])
92 check_fails++;
97 static void
98 sse5_test (void)
100 int i;
102 /* Check hsubbw */
103 init_sbyte ();
105 for (i = 0; i < NUM; i++)
106 dst.x[i] = _mm_hsubw_epi8 (src1.x[i]);
108 if (check_sbyte2word())
109 abort ();
112 /* Check hsubwd */
113 init_sword ();
115 for (i = 0; i < (NUM ); i++)
116 dst.x[i] = _mm_hsubd_epi16 (src1.x[i]);
118 if (check_sword2dword())
119 abort ();
121 /* Check hsubdq */
122 init_sdword ();
123 for (i = 0; i < NUM; i++)
124 dst.x[i] = _mm_hsubq_epi32 (src1.x[i]);
126 if (check_dword2qword())
127 abort ();