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

Subversion Repositories openrisc

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

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


extern void abort (void);
 
int
main ()
{
  int i, j;
  unsigned long u, r1, r2;
 
  i = -16;
  j = 1;
  u = i + j;
 
  /* no sign extension upon shift */
  r1 = u >> 1;
  /* sign extension upon shift, but there shouldn't be */
  r2 = ((unsigned long) (i + j)) >> 1;
 
  if (r1 != r2)
    abort ();
 
  return 0;
}

Line No.	Rev	Author	Line
1	688	jeremybenn	`extern void abort (void);`
2
3			`int`
4			`main ()`
5			`{`
6			`int i, j;`
7			`unsigned long u, r1, r2;`
8
9			`i = -16;`
10			`j = 1;`
11			`u = i + j;`
12
13			`/* no sign extension upon shift */`
14			`r1 = u >> 1;`
15			`/* sign extension upon shift, but there shouldn't be */`
16			`r2 = ((unsigned long) (i + j)) >> 1;`
17
18			`if (r1 != r2)`
19			`abort ();`
20
21			`return 0;`
22			`}`

Browse

Tools

Subversion Repositories openrisc

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