1 /* Disable warnings to squelch deprecation message about -maltivec=be. */
2 /* { dg-options "-w -maltivec=be -mabi=altivec -std=gnu99 -mno-vsx" } */
3
4 #include "harness.h"
5
test()6 static void test()
7 {
8 /* Input vectors. */
9 vector unsigned char vuca = {0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15};
10 vector unsigned char vucb = {16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31};
11 vector signed char vsca = {-16,-15,-14,-13,-12,-11,-10,-9,-8,-7,-6,-5,-4,-3,-2,-1};
12 vector signed char vscb = {0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15};
13 vector unsigned short vusa = {0,1,2,3,4,5,6,7};
14 vector unsigned short vusb = {8,9,10,11,12,13,14,15};
15 vector signed short vssa = {-8,-7,-6,-5,-4,-3,-2,-1};
16 vector signed short vssb = {0,1,2,3,4,5,6,7};
17 vector unsigned int vuia = {0,1,2,3};
18 vector unsigned int vuib = {4,5,6,7};
19 vector signed int vsia = {-4,-3,-2,-1};
20 vector signed int vsib = {0,1,2,3};
21 vector float vfa = {-4.0,-3.0,-2.0,-1.0};
22 vector float vfb = {0.0,1.0,2.0,3.0};
23
24 #if __BYTE_ORDER__ == __ORDER_LITTLE_ENDIAN__
25 vector unsigned char vucp = {15,16,14,17,13,18,12,19,11,20,10,21,9,22,8,23};
26 vector unsigned char vscp = {15,16,14,17,13,18,12,19,11,20,10,21,9,22,8,23};
27 vector unsigned char vusp = {15,14,17,16,13,12,19,18,11,10,21,20,9,8,23,22};
28 vector unsigned char vssp = {15,14,17,16,13,12,19,18,11,10,21,20,9,8,23,22};
29 vector unsigned char vuip = {15,14,13,12,19,18,17,16,11,10,9,8,23,22,21,20};
30 vector unsigned char vsip = {15,14,13,12,19,18,17,16,11,10,9,8,23,22,21,20};
31 vector unsigned char vfp = {15,14,13,12,19,18,17,16,11,10,9,8,23,22,21,20};
32 #else
33 vector unsigned char vucp = {0,31,1,30,2,29,3,28,4,27,5,26,6,25,7,24};
34 vector unsigned char vscp = {0,31,1,30,2,29,3,28,4,27,5,26,6,25,7,24};
35 vector unsigned char vusp = {0,1,30,31,2,3,28,29,4,5,26,27,6,7,24,25};
36 vector unsigned char vssp = {0,1,30,31,2,3,28,29,4,5,26,27,6,7,24,25};
37 vector unsigned char vuip = {0,1,2,3,28,29,30,31,4,5,6,7,24,25,26,27};
38 vector unsigned char vsip = {0,1,2,3,28,29,30,31,4,5,6,7,24,25,26,27};
39 vector unsigned char vfp = {0,1,2,3,28,29,30,31,4,5,6,7,24,25,26,27};
40 #endif
41
42 /* Result vectors. */
43 vector unsigned char vuc;
44 vector signed char vsc;
45 vector unsigned short vus;
46 vector signed short vss;
47 vector unsigned int vui;
48 vector signed int vsi;
49 vector float vf;
50
51 /* Expected result vectors. */
52 vector unsigned char vucr = {0,31,1,30,2,29,3,28,4,27,5,26,6,25,7,24};
53 vector signed char vscr = {-16,15,-15,14,-14,13,-13,12,-12,11,-11,10,-10,9,-9,8};
54 vector unsigned short vusr = {0,15,1,14,2,13,3,12};
55 vector signed short vssr = {-8,7,-7,6,-6,5,-5,4};
56 vector unsigned int vuir = {0,7,1,6};
57 vector signed int vsir = {-4,3,-3,2};
58 vector float vfr = {-4.0,3.0,-3.0,2.0};
59
60 vuc = vec_perm (vuca, vucb, vucp);
61 vsc = vec_perm (vsca, vscb, vscp);
62 vus = vec_perm (vusa, vusb, vusp);
63 vss = vec_perm (vssa, vssb, vssp);
64 vui = vec_perm (vuia, vuib, vuip);
65 vsi = vec_perm (vsia, vsib, vsip);
66 vf = vec_perm (vfa, vfb, vfp );
67
68 check (vec_all_eq (vuc, vucr), "vuc");
69 check (vec_all_eq (vsc, vscr), "vsc");
70 check (vec_all_eq (vus, vusr), "vus");
71 check (vec_all_eq (vss, vssr), "vss");
72 check (vec_all_eq (vui, vuir), "vui");
73 check (vec_all_eq (vsi, vsir), "vsi");
74 check (vec_all_eq (vf, vfr), "vf" );
75 }
76