1/* { dg-options "-maltivec=be -mabi=altivec -std=gnu99 -mno-vsx" } */
2
3#include "harness.h"
4
5static void test()
6{
7  vector unsigned char va = {0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15};
8  vector signed char vb = {-8,-7,-6,-5,-4,-3,-2,-1,0,1,2,3,4,5,6,7};
9  vector unsigned short vc = {0,1,2,3,4,5,6,7};
10  vector signed short vd = {-4,-3,-2,-1,0,1,2,3};
11  vector unsigned int ve = {0,1,2,3};
12  vector signed int vf = {-2,-1,0,1};
13  vector float vg = {-2.0f,-1.0f,0.0f,1.0f};
14
15#if __BYTE_ORDER__ == __ORDER_LITTLE_ENDIAN__
16  check (vec_extract (va, 5) == 10, "vec_extract (va, 5)");
17  check (vec_extract (vb, 0) == 7, "vec_extract (vb, 0)");
18  check (vec_extract (vc, 7) == 0, "vec_extract (vc, 7)");
19  check (vec_extract (vd, 3) == 0, "vec_extract (vd, 3)");
20  check (vec_extract (ve, 2) == 1, "vec_extract (ve, 2)");
21  check (vec_extract (vf, 1) == 0, "vec_extract (vf, 1)");
22  check (vec_extract (vg, 0) == 1.0f, "vec_extract (vg, 0)");
23#else
24  check (vec_extract (va, 5) == 5, "vec_extract (va, 5)");
25  check (vec_extract (vb, 0) == -8, "vec_extract (vb, 0)");
26  check (vec_extract (vc, 7) == 7, "vec_extract (vc, 7)");
27  check (vec_extract (vd, 3) == -1, "vec_extract (vd, 3)");
28  check (vec_extract (ve, 2) == 2, "vec_extract (ve, 2)");
29  check (vec_extract (vf, 1) == -1, "vec_extract (vf, 1)");
30  check (vec_extract (vg, 0) == -2.0f, "vec_extract (vg, 0)");
31#endif
32}
33
34