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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-stable/] [gcc-4.5.1/] [gcc/] [testsuite/] [gcc.target/] [powerpc/] [vsx-vector-2.c] - Blame information for rev 859

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

Line No. Rev Author Line
1 322 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 
}

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.