(root)/
gcc-13.2.0/
gcc/
testsuite/
gcc.target/
powerpc/
vec-extractl-be-1.c
       1  /* { dg-options "-mdejagnu-cpu=power10" } */
       2  /* { dg-additional-options "-mbig" { target powerpc64le-*-* } } */
       3  
       4  #include <altivec.h>
       5  
       6  extern void abort (void);
       7  
       8  int
       9  main (int argc, char *argv [])
      10  {
      11    vector unsigned short source_a = { 0, 2, 4, 6, 8, 10, 12, 14 };
      12    vector unsigned short source_b = { 16, 18, 20, 22, 24, 26, 28, 30 };
      13  
      14    vector unsigned long long int result_1 = { 0, 14 };
      15    vector unsigned long long int result_2 = { 0, 16 };
      16    vector unsigned long long int result_3 = { 0, 24 };
      17    vector unsigned long long int result_4 = { 0, 12 };
      18  
      19    if (!vec_all_eq (vec_extractl (source_a, source_b, 14), result_1))
      20      abort ();
      21    if (!vec_all_eq (vec_extractl (source_a, source_b, 16), result_2))
      22      abort ();
      23    if (!vec_all_eq (vec_extractl (source_b, source_a, 8), result_3))
      24      abort ();
      25    if (!vec_all_eq (vec_extractl (source_b, source_a, 28), result_4))
      26      abort ();
      27  
      28    return 0;
      29  }
      30  
      31  /* { dg-final { scan-assembler {\mvextduhvlx\M} } } */