1 /* { dg-do compile { target { powerpc*-*-* } } } */
2 /* { dg-skip-if "" { powerpc*-*-darwin* } } */
3 /* { dg-require-effective-target powerpc_vsx_ok } */
4 /* { dg-skip-if "do not override -mcpu" { powerpc*-*-* } { "-mcpu=*" } { "-mcpu=power7" } } */
5 /* { dg-options "-O2 -mcpu=power7" } */
6 /* { dg-final { scan-assembler-not "stfd" } } */
8 /* PR 47862: Verify caller-save spill of vectors in FP regs do not use
9 legacy FP insns, which spill only half the vector. */
10 extern vector
double dd
[15];
14 vector
double a
,b
,c
,d
,e
,f
,g
,h
,i
,j
,k
,l
,m
,n
;
16 a
=dd
[1]; b
=dd
[2]; c
=dd
[3]; d
=dd
[4]; e
=dd
[5]; f
=dd
[6]; g
=dd
[7]; h
=dd
[8]; i
=dd
[9];
17 j
=dd
[10]; k
=dd
[11]; l
=dd
[12]; m
=dd
[13]; n
=dd
[14];
19 return (a
+b
+c
+d
+e
+f
+g
+h
+i
+j
+k
+l
+m
+n
);