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 
6 static unsigned char svuc[16] __attribute__ ((aligned (16)));
7 static signed char svsc[16] __attribute__ ((aligned (16)));
8 static unsigned short svus[8] __attribute__ ((aligned (16)));
9 static signed short svss[8] __attribute__ ((aligned (16)));
10 static unsigned int svui[4] __attribute__ ((aligned (16)));
11 static signed int svsi[4] __attribute__ ((aligned (16)));
12 static float svf[4] __attribute__ ((aligned (16)));
13 
init()14 static void init ()
15 {
16   int i;
17 #if __BYTE_ORDER__ == __ORDER_LITTLE_ENDIAN__
18   for (i = 15; i >= 0; --i)
19 #else
20   for (i = 0; i < 16; ++i)
21 #endif
22     {
23       svuc[i] = i;
24       svsc[i] = i - 8;
25     }
26 #if __BYTE_ORDER__ == __ORDER_LITTLE_ENDIAN__
27   for (i = 7; i >= 0; --i)
28 #else
29   for (i = 0; i < 8; ++i)
30 #endif
31     {
32       svus[i] = i;
33       svss[i] = i - 4;
34     }
35 #if __BYTE_ORDER__ == __ORDER_LITTLE_ENDIAN__
36   for (i = 3; i >= 0; --i)
37 #else
38   for (i = 0; i < 4; ++i)
39 #endif
40     {
41       svui[i] = i;
42       svsi[i] = i - 2;
43       svf[i] = i * 1.0f;
44     }
45 }
46 
test()47 static void test ()
48 {
49   vector unsigned char vuc;
50   vector signed char vsc;
51   vector unsigned short vus;
52   vector signed short vss;
53   vector unsigned int vui;
54   vector signed int vsi;
55   vector float vf;
56 
57   init ();
58 
59   vuc = vec_lde (9*1, (unsigned char *)svuc);
60   vsc = vec_lde (14*1, (signed char *)svsc);
61   vus = vec_lde (7*2, (unsigned short *)svus);
62   vss = vec_lde (1*2, (signed short *)svss);
63   vui = vec_lde (3*4, (unsigned int *)svui);
64   vsi = vec_lde (2*4, (signed int *)svsi);
65   vf  = vec_lde (0*4, (float *)svf);
66 
67   check (vec_extract (vuc, 9) == 9, "vuc");
68   check (vec_extract (vsc, 14) == 6, "vsc");
69   check (vec_extract (vus, 7) == 7, "vus");
70   check (vec_extract (vss, 1) == -3, "vss");
71   check (vec_extract (vui, 3) == 3, "vui");
72   check (vec_extract (vsi, 2) == 0, "vsi");
73   check (vec_extract (vf,  0) == 0.0, "vf");
74 }
75