1  /* { dg-do compile { target le } } */
       2  /* { dg-require-effective-target powerpc_p8vector_ok } */
       3  /* { dg-options "-mdejagnu-cpu=power8 -O3 " } */
       4  /* { dg-final { scan-assembler "lxvd2x" } } */
       5  /* { dg-final { scan-assembler "stxvd2x" } } */
       6  /* { dg-final { scan-assembler-not "xxpermdi" } } */
       7  
       8  /* Verify that swap optimization works correctly for a truncating splat.  */
       9  
      10  /* Test case to resolve PR77613.  */
      11  
      12  void pr77613 (signed short a, signed short *x, signed short *y)
      13  {
      14    unsigned long i;
      15  
      16    for (i = 0; i < 1024; i++)
      17      y[i] = a * x[i] + y[i];
      18  }