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

Subversion Repositories openrisc

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

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 688 jeremybenn
int v;
2
 
3
f ()
4
{
5
  unsigned long *a1, *a2;
6
  int vertex2;
7
  int c, x1, x2, dx1, dx2, dy1, dy2, e1, e2, s2;
8
  unsigned long m, b;
9
  int n;
10
  unsigned long r;
11
  int aba;
12
 
13
  do
14
    {
15
      if (dx2 >= dy2)
16
        dx2 = dx2 % dy2;
17
 
18
      if (dx2 >= dy2)
19
        {
20
          s2 = - (dx2 / dy2);
21
          dx2 = dx2 % dy2;
22
        }
23
    }
24
  while (vertex2 / 65536);
25
 
26
  for (;;)
27
    {
28
      c = x2;
29
      a2 = a1;
30
      if (v)
31
        a2 = 0;
32
 
33
      if (c + n)
34
        {
35
          m = b << (c * 8);
36
          *a2 = (*a2 & ~m) | (r & m);
37
          n += c;
38
 
39
          while (--n)
40
            {
41
              {
42
              }
43
            }
44
        }
45
 
46
      a1 = 0;
47
      x1 += 0;
48
      if (e1 += dx1)
49
        e1 -= dy1;
50
      x2 += s2;
51
      if (e2 += dx2)
52
        e2 -= dy2;
53
    }
54
}

powered by: WebSVN 2.1.0

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