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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [compile/] [961004-1.c] - Blame information for rev 774

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

Line No. Rev Author Line
1 688 jeremybenn 
void
2 
f1 (o1, o2, o3, i, j, k)
3 
     long long *o1, *o2, *o3;
4 
     int i, j, k;
5 
{
6 
  while (--i)
7 
    o1[i] = o2[j >>= 1] + o3[k >>= 1];
8 
}
9 
 
10 
void
11 
f2 (o1, o2, o3, i, j, k)
12 
     long long *o1, *o2, *o3;
13 
     int i, j, k;
14 
{
15 
  while (--i)
16 
    o1[i] = o2[j >>= 1] - o3[k >>= 1];
17 
}
18 
 
19 
void
20 
f3 (o1, o2, o3, i, j, k)
21 
     long long *o1, *o3;
22 
     unsigned *o2;
23 
     int i, j, k;
24 
{
25 
  while (--i)
26 
    o1[i] = o2[j >>= 1] + o3[k >>= 1];
27 
}
28 
 
29 
void
30 
f4 (o1, o2, o3, i, j, k)
31 
     long long *o1, *o2;
32 
     unsigned *o3;
33 
     int i, j, k;
34 
{
35 
  while (--i)
36 
    o1[i] = o2[j >>= 1] - o3[k >>= 1];
37 
}

powered by: WebSVN 2.1.0

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