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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [execute/] [930518-1.c] - Blame information for rev 801

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

Line No. Rev Author Line
1 688 jeremybenn 
int bar = 0;
2 
 
3 
f (p)
4 
     int *p;
5 
{
6 
  int foo = 2;
7 
 
8 
  while (foo > bar)
9 
    {
10 
      foo -=  bar;
11 
      *p++ = foo;
12 
      bar = 1;
13 
    }
14 
}
15 
 
16 
main ()
17 
{
18 
  int tab[2];
19 
  tab[0] = tab[1] = 0;
20 
  f (tab);
21 
  if (tab[0] != 2 || tab[1] != 1)
22 
    abort ();
23 
  exit (0);
24 
}

powered by: WebSVN 2.1.0

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