gcc/testsuite/gcc.dg/torture/vector-shift2.c

   1 /* { dg-do run } */
   2
   3 #define vector(elcount, type)  \
   4 __attribute__((vector_size((elcount)*sizeof(type)))) type
   5
   6 #define vidx(type, vec, idx) (*((type *) &(vec) + idx))
   7 #define uchar unsigned char
   8
   9 #define ch14 1,2,3,4
  10 #define ch1  1,1,1,1
  11 #define chm1 -1,-1,-1,-1
  12
  13 int main (int argc, char *argv[]) {
  14     vector(16, uchar) vuchar  = { ch14, ch14, ch14, ch14};
  15     vector(16,  char) vchar0  = { ch1, ch1, ch1, ch1};
  16     vector(16,  char) vchar1  = { chm1, chm1, chm1, chm1};
  17
  18     vector(16,  char) i1, i2, i3;
  19     vector(16, uchar) u1, u2, u3;
  20
  21     i1 = vchar1<< vchar0;
  22
  23     if (vidx(char, i1, 0) != ((char)-1 << (char)1))
  24         __builtin_abort ();
  25     if (vidx(char, i1, 1) != ((char)-1 << (char)1))
  26         __builtin_abort ();
  27     if (vidx(char, i1, 2) != ((char)-1 << (char)1))
  28         __builtin_abort ();
  29     if (vidx(char, i1, 3) != ((char)-1 << (char)1))
  30         __builtin_abort ();
  31     u1 = vuchar << vchar0;
  32
  33     if (vidx(char, u1, 0) != ((uchar)1  << (char)1))
  34         __builtin_abort ();
  35     if (vidx(char, u1, 1) != ((uchar)2  << (char)1))
  36         __builtin_abort ();
  37     if (vidx(char, u1, 2) != ((uchar)3  << (char)1))
  38         __builtin_abort ();
  39     if (vidx(char, u1, 3) != ((uchar)4  << (char)1))
  40         __builtin_abort ();
  41
  42
  43     i2 = vchar1 >> vuchar;
  44
  45     if (vidx(char, i2, 0) != ((char)-1  >> (uchar)1))
  46         __builtin_abort ();
  47     if (vidx(char, i2, 1) != ((char)-1  >> (uchar)2))
  48         __builtin_abort ();
  49     if (vidx(char, i2, 2) != ((char)-1  >> (uchar)3))
  50         __builtin_abort ();
  51     if (vidx(char, i2, 3) != ((char)-1  >> (uchar)4))
  52         __builtin_abort ();
  53
  54     vchar1 >>= vuchar;
  55     vuchar <<= vchar0;
  56     vuchar <<= vchar1;
  57
  58     return 0;
  59 }
  60