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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [execute/] [950322-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 
f (unsigned char *a)
2 
{
3 
  int i, j;
4 
  int x, y;
5 
 
6 
  j = a[1];
7 
  i = a[0] - j;
8 
  if (i < 0)
9 
    {
10 
      x = 1;
11 
      y = -i;
12 
    }
13 
  else
14 
    {
15 
      x = 0;
16 
      y =  i;
17 
    }
18 
  return x + y;
19 
}
20 
 
21 
 
22 
main ()
23 
{
24 
  unsigned char a[2];
25 
  a[0] = 8;
26 
  a[1] = 9;
27 
  if (f (a) != 2)
28 
    abort ();
29 
  exit (0);
30 
}

powered by: WebSVN 2.1.0

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