gcc/testsuite/gcc.target/powerpc/vec-extracth-1.c

   1 /* { dg-do run { target { power10_hw } } } */
   2 /* { dg-do link { target { ! power10_hw } } } */
   3 /* { dg-require-effective-target power10_ok } */
   4 /* { dg-options "-mdejagnu-cpu=power10" } */
   5
   6 #include <altivec.h>
   7
   8 extern void abort (void);
   9
  10 int
  11 main (int argc, char *argv [])
  12 {
  13   vector unsigned char source_a = {
  14     0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15 };
  15   vector unsigned char source_b = {
  16     16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31 };
  17
  18   vector unsigned long long int result_1 = { 0, 16 };
  19   vector unsigned long long int result_2 = { 0, 15 };
  20   vector unsigned long long int result_3 = { 0, 11 };
  21   vector unsigned long long int result_4 = { 0, 23 };
  22
  23   if (!vec_all_eq (vec_extracth (source_a, source_b, 15), result_1))
  24     abort ();
  25   if (!vec_all_eq (vec_extracth (source_a, source_b, 16), result_2))
  26     abort ();
  27   if (!vec_all_eq (vec_extracth (source_b, source_a, 4), result_3))
  28     abort ();
  29   if (!vec_all_eq (vec_extracth (source_b, source_a, 24), result_4))
  30     abort ();
  31
  32   return 0;
  33 }