OSDN Git Service

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