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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [unsorted/] [mregtst.c] - Blame information for rev 717

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

Line No. Rev Author Line
1 688 jeremybenn
foo (a, p)
2
     int *p;
3
{
4
  int old, new, i;
5
 
6
  old = 0;
7
  for (i = 1; i < 100; i++)
8
    {
9
      new = p[i];
10
      if (new < old)
11
        a++;
12
      old = new;
13
      if (old == 0)
14
        return 0;
15
    }
16
  return a;
17
}

powered by: WebSVN 2.1.0

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