1  /* { dg-do compile { target { powerpc*-*-* && lp64 } } } */
       2  /* { dg-skip-if "" { powerpc*-*-darwin* } } */
       3  /* { dg-require-effective-target powerpc_p9vector_ok } */
       4  /* { dg-options "-O2 -mdejagnu-cpu=power9" } */
       5  
       6  #include <altivec.h>
       7  
       8  #ifdef __LITTLE_ENDIAN__
       9  #define ELEMENT 1
      10  #else
      11  #define ELEMENT 0
      12  #endif
      13  
      14  void foo (double *p, vector double v)
      15  {
      16    p[10] = vec_extract (v, ELEMENT);
      17  }
      18  
      19  /* { dg-final { scan-assembler     "stxsd "   } } */
      20  /* { dg-final { scan-assembler-not "stxsdx"   } } */
      21  /* { dg-final { scan-assembler-not "stfd"     } } */
      22  /* { dg-final { scan-assembler-not "xxpermdi" } } */