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