1  /* { dg-do compile { target { powerpc*-*-* } } } */
       2  /* { dg-require-effective-target powerpc_p9vector_ok } */
       3  /* { dg-options "-mdejagnu-cpu=power9" } */
       4  
       5  #include <altivec.h>
       6  
       7  __vector unsigned long long int
       8  get_exponents (__vector double *p)
       9  {
      10    __vector double source = *p;
      11  
      12    return vec_extract_exp (source);
      13  }
      14  
      15  /* { dg-final { scan-assembler "xvxexpdp" } } */