URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.target/] [powerpc/] [vsx-vector-2.c] - Blame information for rev 801

Go to most recent revision | Details | Compare with Previous | View Log


/* { dg-do compile { target { powerpc*-*-* && lp64 } } } */
/* { dg-skip-if "" { powerpc*-*-darwin* } { "*" } { "" } } */
/* { dg-require-effective-target powerpc_vsx_ok } */
/* { dg-options "-O2 -ftree-vectorize -mcpu=power7 -ffast-math" } */
/* { dg-final { scan-assembler "xvaddsp" } } */
/* { dg-final { scan-assembler "xvsubsp" } } */
/* { dg-final { scan-assembler "xvmulsp" } } */
/* { dg-final { scan-assembler "xvdivsp" } } */
/* { dg-final { scan-assembler "xvmadd" } } */
/* { dg-final { scan-assembler "xvmsub" } } */
/* { dg-final { scan-assembler "xvsqrtsp" } } */
/* { dg-final { scan-assembler "xvcpsgnsp" } } */
/* { dg-final { scan-assembler "xvrspim" } } */
/* { dg-final { scan-assembler "xvrspip" } } */
/* { dg-final { scan-assembler "xvrspiz" } } */
/* { dg-final { scan-assembler "xvrspic" } } */
/* { dg-final { scan-assembler "xvrspi " } } */
 
#ifndef SIZE
#define SIZE 1024
#endif
 
float a[SIZE] __attribute__((__aligned__(32)));
float b[SIZE] __attribute__((__aligned__(32)));
float c[SIZE] __attribute__((__aligned__(32)));
float d[SIZE] __attribute__((__aligned__(32)));
float e[SIZE] __attribute__((__aligned__(32)));
 
void
vector_add (void)
{
  int i;
 
  for (i = 0; i < SIZE; i++)
    a[i] = b[i] + c[i];
}
 
void
vector_subtract (void)
{
  int i;
 
  for (i = 0; i < SIZE; i++)
    a[i] = b[i] - c[i];
}
 
void
vector_multiply (void)
{
  int i;
 
  for (i = 0; i < SIZE; i++)
    a[i] = b[i] * c[i];
}
 
void
vector_multiply_add (void)
{
  int i;
 
  for (i = 0; i < SIZE; i++)
    a[i] = (b[i] * c[i]) + d[i];
}
 
void
vector_multiply_subtract (void)
{
  int i;
 
  for (i = 0; i < SIZE; i++)
    a[i] = (b[i] * c[i]) - d[i];
}
 
void
vector_divide (void)
{
  int i;
 
  for (i = 0; i < SIZE; i++)
    a[i] = b[i] / c[i];
}
 
extern float sqrtf (float);
extern float floorf (float);
extern float ceilf (float);
extern float truncf (float);
extern float nearbyintf (float);
extern float rintf (float);
extern float copysignf (float, float);
 
void
vector_sqrt (void)
{
  int i;
 
  for (i = 0; i < SIZE; i++)
    a[i] = sqrtf (b[i]);
}
 
void
vector_floor (void)
{
  int i;
 
  for (i = 0; i < SIZE; i++)
    a[i] = floorf (b[i]);
}
 
void
vector_ceil (void)
{
  int i;
 
  for (i = 0; i < SIZE; i++)
    a[i] = ceilf (b[i]);
}
 
void
vector_trunc (void)
{
  int i;
 
  for (i = 0; i < SIZE; i++)
    a[i] = truncf (b[i]);
}
 
void
vector_nearbyint (void)
{
  int i;
 
  for (i = 0; i < SIZE; i++)
    a[i] = nearbyintf (b[i]);
}
 
void
vector_rint (void)
{
  int i;
 
  for (i = 0; i < SIZE; i++)
    a[i] = rintf (b[i]);
}
 
void
vector_copysign (void)
{
  int i;
 
  for (i = 0; i < SIZE; i++)
    a[i] = copysignf (b[i], c[i]);
}

Line No.	Rev	Author	Line
1	691	jeremybenn	`/* { dg-do compile { target { powerpc--* && lp64 } } } */`
2			`/* { dg-skip-if "" { powerpc--darwin* } { "" } { "" } } /`
3			`/* { dg-require-effective-target powerpc_vsx_ok } */`
4			`/* { dg-options "-O2 -ftree-vectorize -mcpu=power7 -ffast-math" } */`
5			`/* { dg-final { scan-assembler "xvaddsp" } } */`
6			`/* { dg-final { scan-assembler "xvsubsp" } } */`
7			`/* { dg-final { scan-assembler "xvmulsp" } } */`
8			`/* { dg-final { scan-assembler "xvdivsp" } } */`
9			`/* { dg-final { scan-assembler "xvmadd" } } */`
10			`/* { dg-final { scan-assembler "xvmsub" } } */`
11			`/* { dg-final { scan-assembler "xvsqrtsp" } } */`
12			`/* { dg-final { scan-assembler "xvcpsgnsp" } } */`
13			`/* { dg-final { scan-assembler "xvrspim" } } */`
14			`/* { dg-final { scan-assembler "xvrspip" } } */`
15			`/* { dg-final { scan-assembler "xvrspiz" } } */`
16			`/* { dg-final { scan-assembler "xvrspic" } } */`
17			`/* { dg-final { scan-assembler "xvrspi " } } */`
18
19			`#ifndef SIZE`
20			`#define SIZE 1024`
21			`#endif`
22
23			`float a[SIZE] __attribute__((__aligned__(32)));`
24			`float b[SIZE] __attribute__((__aligned__(32)));`
25			`float c[SIZE] __attribute__((__aligned__(32)));`
26			`float d[SIZE] __attribute__((__aligned__(32)));`
27			`float e[SIZE] __attribute__((__aligned__(32)));`
28
29			`void`
30			`vector_add (void)`
31			`{`
32			`int i;`
33
34			`for (i = 0; i < SIZE; i++)`
35			`a[i] = b[i] + c[i];`
36			`}`
37
38			`void`
39			`vector_subtract (void)`
40			`{`
41			`int i;`
42
43			`for (i = 0; i < SIZE; i++)`
44			`a[i] = b[i] - c[i];`
45			`}`
46
47			`void`
48			`vector_multiply (void)`
49			`{`
50			`int i;`
51
52			`for (i = 0; i < SIZE; i++)`
53			`a[i] = b[i] * c[i];`
54			`}`
55
56			`void`
57			`vector_multiply_add (void)`
58			`{`
59			`int i;`
60
61			`for (i = 0; i < SIZE; i++)`
62			`a[i] = (b[i] * c[i]) + d[i];`
63			`}`
64
65			`void`
66			`vector_multiply_subtract (void)`
67			`{`
68			`int i;`
69
70			`for (i = 0; i < SIZE; i++)`
71			`a[i] = (b[i] * c[i]) - d[i];`
72			`}`
73
74			`void`
75			`vector_divide (void)`
76			`{`
77			`int i;`
78
79			`for (i = 0; i < SIZE; i++)`
80			`a[i] = b[i] / c[i];`
81			`}`
82
83			`extern float sqrtf (float);`
84			`extern float floorf (float);`
85			`extern float ceilf (float);`
86			`extern float truncf (float);`
87			`extern float nearbyintf (float);`
88			`extern float rintf (float);`
89			`extern float copysignf (float, float);`
90
91			`void`
92			`vector_sqrt (void)`
93			`{`
94			`int i;`
95
96			`for (i = 0; i < SIZE; i++)`
97			`a[i] = sqrtf (b[i]);`
98			`}`
99
100			`void`
101			`vector_floor (void)`
102			`{`
103			`int i;`
104
105			`for (i = 0; i < SIZE; i++)`
106			`a[i] = floorf (b[i]);`
107			`}`
108
109			`void`
110			`vector_ceil (void)`
111			`{`
112			`int i;`
113
114			`for (i = 0; i < SIZE; i++)`
115			`a[i] = ceilf (b[i]);`
116			`}`
117
118			`void`
119			`vector_trunc (void)`
120			`{`
121			`int i;`
122
123			`for (i = 0; i < SIZE; i++)`
124			`a[i] = truncf (b[i]);`
125			`}`
126
127			`void`
128			`vector_nearbyint (void)`
129			`{`
130			`int i;`
131
132			`for (i = 0; i < SIZE; i++)`
133			`a[i] = nearbyintf (b[i]);`
134			`}`
135
136			`void`
137			`vector_rint (void)`
138			`{`
139			`int i;`
140
141			`for (i = 0; i < SIZE; i++)`
142			`a[i] = rintf (b[i]);`
143			`}`
144
145			`void`
146			`vector_copysign (void)`
147			`{`
148			`int i;`
149
150			`for (i = 0; i < SIZE; i++)`
151			`a[i] = copysignf (b[i], c[i]);`
152			`}`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.target/] [powerpc/] [vsx-vector-2.c] - Blame information for rev 801