gcc/testsuite/gcc.target/powerpc/vsx-builtin-17b.c

   1 /* { dg-do run } */
   2 /* { dg-require-effective-target vmx_hw } */
   3 /* { dg-options "-maltivec -O3" } */
   4
   5 /* This test should run the same on any target that supports altivec/dfp
   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          (0)
  14 #define CONST1          (1)
  15 #define CONST2          (2)
  16 #define CONST3          (3)
  17 #define CONST4          (4)
  18 #define CONST5          (5)
  19 #define CONST6          (6)
  20 #define CONST7          (7)
  21
  22
  23 /* Test that indices > length of vector are applied modulo the vector
  24    length.  */
  25
  26 /* Test for vector residing in register.  */
  27 unsigned short s3 (vector unsigned short v)
  28 {
  29   return __builtin_vec_extract (v, 3);
  30 }
  31
  32 unsigned short s7 (vector unsigned short v)
  33 {
  34   return __builtin_vec_extract (v, 7);
  35 }
  36
  37 unsigned short s21 (vector unsigned short v)
  38 {
  39   return __builtin_vec_extract (v, 21);
  40 }
  41
  42 unsigned short s30 (vector unsigned short v)
  43 {
  44   return __builtin_vec_extract (v, 30);
  45 }
  46
  47 /* Test for vector residing in memory.  */
  48 unsigned short ms3 (vector unsigned short *vp)
  49 {
  50   return __builtin_vec_extract (*vp, 3);
  51 }
  52
  53 unsigned short ms7 (vector unsigned short *vp)
  54 {
  55   return __builtin_vec_extract (*vp, 7);
  56 }
  57
  58 unsigned short ms21 (vector unsigned short *vp)
  59 {
  60   return __builtin_vec_extract (*vp, 21);
  61 }
  62
  63 unsigned short ms30 (vector unsigned short *vp)
  64 {
  65   return __builtin_vec_extract (*vp, 30);
  66 }
  67
  68 /* Test the same with variable indices.  */
  69
  70 /* Test for variable selector and vector residing in register.  */
  71 __attribute__((noinline))
  72 unsigned short ci (vector unsigned short v, int i)
  73 {
  74   return __builtin_vec_extract (v, i);
  75 }
  76
  77 /* Test for variable selector and vector residing in memory.  */
  78 __attribute__((noinline))
  79 unsigned short mci (vector unsigned short *vp, int i)
  80 {
  81   return __builtin_vec_extract (*vp, i);
  82 }
  83
  84
  85 int main (int argc, unsigned short *argv[]) {
  86   vector unsigned short sv = {
  87     CONST0, CONST1, CONST2, CONST3, CONST4, CONST5, CONST6, CONST7 };
  88   unsigned short s;
  89
  90   s = s3 (sv);
  91   if (s != CONST3)
  92     abort ();
  93
  94   s = s7 (sv);
  95   if (s != CONST7)
  96     abort ();
  97
  98   s = s21 (sv);
  99   if (s != CONST5)
 100     abort ();
 101
 102   s = s30 (sv);
 103   if (s != CONST6)
 104     abort ();
 105
 106   s = ms3 (&sv);
 107   if (s != CONST3)
 108     abort ();
 109
 110   s = ms7 (&sv);
 111   if (s != CONST7)
 112     abort ();
 113
 114   s = ms21 (&sv);
 115   if (s != CONST5)
 116     abort ();
 117
 118   s = ms30 (&sv);
 119   if (s != CONST6)
 120     abort ();
 121
 122   s = ci (sv, 5);
 123   if (s != CONST5)
 124     abort ();
 125
 126   s = ci (sv, 2);
 127   if (s != CONST2)
 128     abort ();
 129
 130   s = ci (sv, 15);
 131   if (s != CONST7)
 132     abort ();
 133
 134   s = ci (sv, 28);
 135   if (s != CONST4)
 136     abort ();
 137
 138   s = mci (&sv, 5);
 139   if (s != CONST5)
 140     abort ();
 141
 142   s = mci (&sv, 12);
 143   if (s != CONST4)
 144     abort ();
 145
 146   s = mci (&sv, 25);
 147   if (s != CONST1)
 148     abort ();
 149
 150   s = mci (&sv, 16);
 151   if (s != CONST0)
 152     abort ();
 153
 154   return 0;
 155 }