1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
|
/* { dg-do compile { target { powerpc*-*-* } } } */
/* { dg-skip-if "" { powerpc*-*-darwin* } } */
/* { dg-require-effective-target powerpc_p9vector_ok } */
/* { dg-skip-if "do not override -mcpu" { powerpc*-*-* } { "-mcpu=*" } { "-mcpu=power9" } } */
/* { dg-options "-mcpu=power9 -O3 -funroll-loops" } */
/* derived from 20021120-1.c, compiled for -mcpu=power9. */
extern void abort (void);
extern void exit (int);
volatile double gd[32];
volatile float gf[32];
void
foo (int n)
{
double d00, d10, d20, d30, d01, d11, d21, d31, d02, d12, d22, d32, d03, d13,
d23, d33, d04, d14, d24, d34, d05, d15, d25, d35, d06, d16, d26, d36, d07,
d17, d27, d37;
float f00, f10, f20, f30, f01, f11, f21, f31, f02, f12, f22, f32, f03, f13,
f23, f33, f04, f14, f24, f34, f05, f15, f25, f35, f06, f16, f26, f36, f07,
f17, f27, f37;
volatile double *pd;
volatile float *pf;
int i;
pd = gd;
d00 = *(pd++), d10 = *(pd++), d20 = *(pd++), d30 = *(pd++), d01 =
*(pd++), d11 = *(pd++), d21 = *(pd++), d31 = *(pd++), d02 = *(pd++), d12 =
*(pd++), d22 = *(pd++), d32 = *(pd++), d03 = *(pd++), d13 = *(pd++), d23 =
*(pd++), d33 = *(pd++), d04 = *(pd++), d14 = *(pd++), d24 = *(pd++), d34 =
*(pd++), d05 = *(pd++), d15 = *(pd++), d25 = *(pd++), d35 = *(pd++), d06 =
*(pd++), d16 = *(pd++), d26 = *(pd++), d36 = *(pd++), d07 = *(pd++), d17 =
*(pd++), d27 = *(pd++), d37 = *(pd++);
for (i = 0; i < n; i++)
{
pf = gf;
f00 = *(pf++), f10 = *(pf++), f20 = *(pf++), f30 = *(pf++), f01 =
*(pf++), f11 = *(pf++), f21 = *(pf++), f31 = *(pf++), f02 =
*(pf++), f12 = *(pf++), f22 = *(pf++), f32 = *(pf++), f03 =
*(pf++), f13 = *(pf++), f23 = *(pf++), f33 = *(pf++), f04 =
*(pf++), f14 = *(pf++), f24 = *(pf++), f34 = *(pf++), f05 =
*(pf++), f15 = *(pf++), f25 = *(pf++), f35 = *(pf++), f06 =
*(pf++), f16 = *(pf++), f26 = *(pf++), f36 = *(pf++), f07 =
*(pf++), f17 = *(pf++), f27 = *(pf++), f37 = *(pf++);
pd = gd;
d00 += *(pd++), d10 += *(pd++), d20 += *(pd++), d30 += *(pd++), d01 +=
*(pd++), d11 += *(pd++), d21 += *(pd++), d31 += *(pd++), d02 +=
*(pd++), d12 += *(pd++), d22 += *(pd++), d32 += *(pd++), d03 +=
*(pd++), d13 += *(pd++), d23 += *(pd++), d33 += *(pd++), d04 +=
*(pd++), d14 += *(pd++), d24 += *(pd++), d34 += *(pd++), d05 +=
*(pd++), d15 += *(pd++), d25 += *(pd++), d35 += *(pd++), d06 +=
*(pd++), d16 += *(pd++), d26 += *(pd++), d36 += *(pd++), d07 +=
*(pd++), d17 += *(pd++), d27 += *(pd++), d37 += *(pd++);
pd = gd;
d00 += *(pd++), d10 += *(pd++), d20 += *(pd++), d30 += *(pd++), d01 +=
*(pd++), d11 += *(pd++), d21 += *(pd++), d31 += *(pd++), d02 +=
*(pd++), d12 += *(pd++), d22 += *(pd++), d32 += *(pd++), d03 +=
*(pd++), d13 += *(pd++), d23 += *(pd++), d33 += *(pd++), d04 +=
*(pd++), d14 += *(pd++), d24 += *(pd++), d34 += *(pd++), d05 +=
*(pd++), d15 += *(pd++), d25 += *(pd++), d35 += *(pd++), d06 +=
*(pd++), d16 += *(pd++), d26 += *(pd++), d36 += *(pd++), d07 +=
*(pd++), d17 += *(pd++), d27 += *(pd++), d37 += *(pd++);
pd = gd;
d00 += *(pd++), d10 += *(pd++), d20 += *(pd++), d30 += *(pd++), d01 +=
*(pd++), d11 += *(pd++), d21 += *(pd++), d31 += *(pd++), d02 +=
*(pd++), d12 += *(pd++), d22 += *(pd++), d32 += *(pd++), d03 +=
*(pd++), d13 += *(pd++), d23 += *(pd++), d33 += *(pd++), d04 +=
*(pd++), d14 += *(pd++), d24 += *(pd++), d34 += *(pd++), d05 +=
*(pd++), d15 += *(pd++), d25 += *(pd++), d35 += *(pd++), d06 +=
*(pd++), d16 += *(pd++), d26 += *(pd++), d36 += *(pd++), d07 +=
*(pd++), d17 += *(pd++), d27 += *(pd++), d37 += *(pd++);
pf = gf;
*(pf++) = f00, *(pf++) = f10, *(pf++) = f20, *(pf++) = f30, *(pf++) =
f01, *(pf++) = f11, *(pf++) = f21, *(pf++) = f31, *(pf++) =
f02, *(pf++) = f12, *(pf++) = f22, *(pf++) = f32, *(pf++) =
f03, *(pf++) = f13, *(pf++) = f23, *(pf++) = f33, *(pf++) =
f04, *(pf++) = f14, *(pf++) = f24, *(pf++) = f34, *(pf++) =
f05, *(pf++) = f15, *(pf++) = f25, *(pf++) = f35, *(pf++) =
f06, *(pf++) = f16, *(pf++) = f26, *(pf++) = f36, *(pf++) =
f07, *(pf++) = f17, *(pf++) = f27, *(pf++) = f37;
}
pd = gd;
*(pd++) = d00, *(pd++) = d10, *(pd++) = d20, *(pd++) = d30, *(pd++) =
d01, *(pd++) = d11, *(pd++) = d21, *(pd++) = d31, *(pd++) = d02, *(pd++) =
d12, *(pd++) = d22, *(pd++) = d32, *(pd++) = d03, *(pd++) = d13, *(pd++) =
d23, *(pd++) = d33, *(pd++) = d04, *(pd++) = d14, *(pd++) = d24, *(pd++) =
d34, *(pd++) = d05, *(pd++) = d15, *(pd++) = d25, *(pd++) = d35, *(pd++) =
d06, *(pd++) = d16, *(pd++) = d26, *(pd++) = d36, *(pd++) = d07, *(pd++) =
d17, *(pd++) = d27, *(pd++) = d37;
}
int
main ()
{
int i;
for (i = 0; i < 32; i++)
gd[i] = i, gf[i] = i;
foo (1);
for (i = 0; i < 32; i++)
if (gd[i] != i * 4 || gf[i] != i)
abort ();
exit (0);
}
/* { dg-final { scan-assembler-not "stxsd \[0-9\]+,\[0-9\]+,\[0-9\]" } } */
|
