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] - Rev 774

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

int v;
 
f ()
{
  unsigned long *a1, *a2;
  int vertex2;
  int c, x1, x2, dx1, dx2, dy1, dy2, e1, e2, s2;
  unsigned long m, b;
  int n;
  unsigned long r;
  int aba;
 
  do
    {
      if (dx2 >= dy2)
	dx2 = dx2 % dy2;
 
      if (dx2 >= dy2)
	{
	  s2 = - (dx2 / dy2);
	  dx2 = dx2 % dy2;
	}
    }
  while (vertex2 / 65536);
 
  for (;;)
    {
      c = x2;
      a2 = a1;
      if (v)
	a2 = 0;
 
      if (c + n)
	{
	  m = b << (c * 8);
	  *a2 = (*a2 & ~m) | (r & m);
	  n += c;
 
	  while (--n)
	    {
	      {
	      }
	    }
	}
 
      a1 = 0;
      x1 += 0;
      if (e1 += dx1)
	e1 -= dy1;
      x2 += s2;
      if (e2 += dx2)
	e2 -= dy2;
    }
}
 

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

powered by: WebSVN 2.1.0

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