1 /* { dg-do compile { target { powerpc*-*-* } } } */
2 /* { dg-skip-if "" { powerpc*-*-darwin* } { "*" } { "" } } */
3 /* { dg-require-effective-target powerpc_vsx_ok } */
4 /* { dg-options "-O3 -mcpu=power7 -fcaller-saves" } */
5 /* { dg-final { scan-assembler-not "lxvd2x" } } */
6 /* { dg-final { scan-assembler-not "lxvw4x" } } */
7 /* { dg-final { scan-assembler-not "lvx" } } */
8 /* { dg-final { scan-assembler-not "stxvd2x" } } */
9 /* { dg-final { scan-assembler-not "stxvw4x" } } */
10 /* { dg-final { scan-assembler-not "stvx" } } */
11
12 /* Insure caller save on long double does not use VSX instructions. */
13
14 extern long double modify (long double);
15
16 void
sum(long double * ptr,long double value,unsigned long n)17 sum (long double *ptr, long double value, unsigned long n)
18 {
19 unsigned long i;
20
21 for (i = 0; i < n; i++)
22 ptr[i] += modify (value);
23 }
24