1 /* { dg-do run { target int128 } } */
2 /* { dg-require-effective-target vsx_hw } */
3 /* { dg-options "-mvsx" } */
4
5 /* This test should run the same on any target that supports vsx
6 instructions. Intentionally not specifying cpu in order to test
7 all code generation paths. */
8
9 #include <altivec.h>
10
11 extern void abort (void);
12
13 #define CONST0 (31415926539LL)
14 #define CONST1 (2 * 31415926539LL)
15
16 /* Test that indices > length of vector are applied modulo the vector
17 length. */
18
19 /* Test for vector residing in register. */
e0(vector long long int v)20 long long int e0 (vector long long int v)
21 {
22 return __builtin_vec_ext_v2di (v, 0);
23 }
24
e3(vector long long int v)25 long long int e3 (vector long long int v)
26 {
27 return __builtin_vec_ext_v2di (v, 3);
28 }
29
30 /* Test for vector residing in memory. */
me0(vector long long int * vp)31 long long int me0 (vector long long int *vp)
32 {
33 return __builtin_vec_ext_v2di (*vp, 0);
34 }
35
me3(vector long long int * vp)36 long long int me3 (vector long long int *vp)
37 {
38 return __builtin_vec_ext_v2di (*vp, 3);
39 }
40
41 /* Test the same with variable indices. */
42
43 /* Test for variable selector and vector residing in register. */
44 __attribute__((noinline))
ei(vector long long int v,int i)45 long long int ei (vector long long int v, int i)
46 {
47 return __builtin_vec_ext_v2di (v, i);
48 }
49
50 /* Test for variable selector and vector residing in memory. */
mei(vector long long int * vp,int i)51 long long int mei (vector long long int *vp, int i)
52 {
53 return __builtin_vec_ext_v2di (*vp, i);
54 }
55
main(int argc,char * argv[])56 int main (int argc, char *argv[]) {
57 vector long long int dv = { CONST0, CONST1 };
58 long long int d;
59
60 d = e0 (dv);
61 if (d != CONST0)
62 abort ();
63
64 d = e3 (dv);
65 if (d != CONST1)
66 abort ();
67
68 d = me0 (&dv);
69 if (d != CONST0)
70 abort ();
71
72 d = me3 (&dv);
73 if (d != CONST1)
74 abort ();
75
76 d = ei (dv, 0);
77 if (d != CONST0)
78 abort ();
79
80 d = ei (dv, 1);
81 if (d != CONST1)
82 abort ();
83
84 d = ei (dv, 2);
85 if (d != CONST0)
86 abort ();
87
88 d = ei (dv, 3);
89 if (d != CONST1)
90 abort ();
91
92 d = mei (&dv, 0);
93 if (d != CONST0)
94 abort ();
95
96 d = mei (&dv, 1);
97 if (d != CONST1)
98 abort ();
99
100 d = mei (&dv, 2);
101 if (d != CONST0)
102 abort ();
103
104 d = mei (&dv, 3);
105 if (d != CONST1)
106 abort ();
107
108 return 0;
109 }
110