2006-12-15 H.J. Lu <hongjiu.lu@intel.com>
[official-gcc.git] / gcc / testsuite / gcc.target / i386 / sse3-haddps.c
blob2914b3863f042da4de6d0efaea87747e7499be6d
1 /* { dg-do run { target i?86-*-* x86_64-*-* } } */
2 /* { dg-options "-O2 -msse3" } */
3 #include <pmmintrin.h>
4 #include <stdlib.h>
5 #include "../../gcc.dg/i386-cpuid.h"
7 static void sse3_test (void);
9 int
10 main ()
12 unsigned long cpu_facilities;
14 cpu_facilities = i386_cpuid_ecx ();
16 /* Run SSE3 test only if host has SSE3 support. */
17 if ((cpu_facilities & bit_SSE3))
18 sse3_test ();
20 exit (0);
23 static void
24 sse3_test_haddps (float *i1, float *i2, float *r)
26 __m128 t1 = _mm_loadu_ps (i1);
27 __m128 t2 = _mm_loadu_ps (i2);
29 t1 = _mm_hadd_ps (t1, t2);
31 _mm_storeu_ps (r, t1);
34 static void
35 sse3_test_haddps_subsume (float *i1, float *i2, float *r)
37 __m128 t1 = _mm_load_ps (i1);
38 __m128 t2 = _mm_load_ps (i2);
40 t1 = _mm_hadd_ps (t1, t2);
42 _mm_storeu_ps (r, t1);
45 static int
46 chk_ps(float *v1, float *v2)
48 int i;
49 int n_fails = 0;
51 for (i = 0; i < 4; i++)
52 if (v1[i] != v2[i])
53 n_fails += 1;
55 return n_fails;
58 static float p1[4] __attribute__ ((aligned(16)));
59 static float p2[4] __attribute__ ((aligned(16)));
60 static float p3[4];
61 static float ck[4];
63 static float vals[80] =
65 100.0, 200.0, 300.0, 400.0, 5.0, -1.0, .345, -21.5,
66 1100.0, 0.235, 321.3, 53.40, 0.3, 10.0, 42.0, 32.52,
67 32.6, 123.3, 1.234, 2.156, 0.1, 3.25, 4.75, 32.44,
68 12.16, 52.34, 64.12, 71.13, -.1, 2.30, 5.12, 3.785,
69 541.3, 321.4, 231.4, 531.4, 71., 321., 231., -531.,
70 23.45, 23.45, 23.45, 23.45, 23.45, 23.45, 23.45, 23.45,
71 23.45, -1.43, -6.74, 6.345, -20.1, -20.1, -40.1, -40.1,
72 1.234, 2.345, 3.456, 4.567, 5.678, 6.789, 7.891, 8.912,
73 -9.32, -8.41, -7.50, -6.59, -5.68, -4.77, -3.86, -2.95,
74 9.32, 8.41, 7.50, 6.59, -5.68, -4.77, -3.86, -2.95
77 static void
78 sse3_test ()
80 int i;
81 int fail = 0;
83 for (i = 0; i < 80; i += 8)
85 p1[0] = vals[i+0];
86 p1[1] = vals[i+1];
87 p1[2] = vals[i+2];
88 p1[3] = vals[i+3];
90 p2[0] = vals[i+4];
91 p2[1] = vals[i+5];
92 p2[2] = vals[i+6];
93 p2[3] = vals[i+7];
95 ck[0] = p1[0] + p1[1];
96 ck[1] = p1[2] + p1[3];
97 ck[2] = p2[0] + p2[1];
98 ck[3] = p2[2] + p2[3];
100 sse3_test_haddps (p1, p2, p3);
102 fail += chk_ps (ck, p3);
104 sse3_test_haddps_subsume (p1, p2, p3);
106 fail += chk_ps (ck, p3);
109 if (fail != 0)
110 abort ();