2 /* { dg-require-effective-target vmx_hw } */
3 /* { dg-options "-maltivec" } */
5 /* This test should run the same on any target that supports altivec/vmx
6 instructions. Intentionally not specifying cpu in order to test
7 all code generation paths. */
11 extern void abort (void);
23 /* Test that indices > length of vector are applied modulo the vector
26 /* Test for vector residing in register. */
27 vector
unsigned short s3 (vector
unsigned short v
, unsigned short x
)
29 return vec_insert (x
, v
, 3);
32 vector
unsigned short s7 (vector
unsigned short v
, unsigned short x
)
34 return vec_insert (x
, v
, 7);
37 vector
unsigned short s21 (vector
unsigned short v
, unsigned short x
)
39 return vec_insert (x
, v
, 21);
42 vector
unsigned short s30 (vector
unsigned short v
, unsigned short x
)
44 return vec_insert (x
, v
, 30);
47 /* Test for vector residing in memory. */
48 vector
unsigned short ms3 (vector
unsigned short *vp
, unsigned short x
)
50 return vec_insert (x
, *vp
, 3);
53 vector
unsigned short ms7 (vector
unsigned short *vp
, unsigned short x
)
55 return vec_insert (x
, *vp
, 7);
58 vector
unsigned short ms21 (vector
unsigned short *vp
, unsigned short x
)
60 return vec_insert (x
, *vp
, 21);
63 vector
unsigned short ms30 (vector
unsigned short *vp
, unsigned short x
)
65 return vec_insert (x
, *vp
, 30);
68 /* Test the same with variable indices. */
70 /* Test for variable selector and vector residing in register. */
71 __attribute__((noinline
))
72 vector
unsigned short ci (vector
unsigned short v
, int i
, unsigned short x
)
74 return vec_insert (x
, v
, i
);
77 /* Test for variable selector and vector residing in memory. */
78 __attribute__((noinline
))
79 vector
unsigned short mci (vector
unsigned short *vp
, int i
, unsigned short x
)
81 return vec_insert (x
, *vp
, i
);
85 int main (int argc
, unsigned short *argv
[]) {
86 vector
unsigned short sv
= {
87 CONST0
, CONST1
, CONST2
, CONST3
, CONST4
, CONST5
, CONST6
, CONST7
};
97 sv
= s21 (sv
, CONST3
);
101 sv
= s30 (sv
, CONST4
);
102 if (sv
[6] != CONST4
)
105 sv
= ms3 (&sv
, CONST5
);
106 if (sv
[3] != CONST5
)
109 sv
= ms7 (&sv
, CONST6
);
110 if (sv
[7] != CONST6
)
113 sv
= ms21 (&sv
, CONST7
);
114 if (sv
[5] != CONST7
)
117 sv
= ms30 (&sv
, CONST0
);
118 if (sv
[6] != CONST0
)
121 sv
= ci (sv
, 5, CONST1
);
122 if (sv
[5] != CONST1
)
125 sv
= ci (sv
, 2, CONST3
);
126 if (sv
[2] != CONST3
)
129 sv
= ci (sv
, 15, CONST2
);
130 if (sv
[7] != CONST2
)
133 sv
= ci (sv
, 28, CONST5
);
134 if (sv
[4] != CONST5
)
137 sv
= mci (&sv
, 5, CONST4
);
138 if (sv
[5] != CONST4
)
141 sv
= mci (&sv
, 12, CONST6
);
142 if (sv
[4] != CONST6
)
145 sv
= mci (&sv
, 25, CONST7
);
146 if (sv
[1] != CONST7
)
149 sv
= mci (&sv
, 16, CONST4
);
150 if (sv
[0] != CONST4
)