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

Subversion Repositories openrisc

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

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


/* Copyright (C) 2000  Free Software Foundation  */
/* Contributed by Alexandre Oliva <aoliva@cygnus.com> */
 
unsigned long l = (unsigned long)-2;
unsigned short s;
 
int main () {
  long t = l;
  s = t;
  if (s != (unsigned short)-2)
    abort ();
  exit (0);
}

Line No.	Rev	Author	Line
1	688	jeremybenn	`/* Copyright (C) 2000 Free Software Foundation */`
2			`/* Contributed by Alexandre Oliva <aoliva@cygnus.com> */`
3
4			`unsigned long l = (unsigned long)-2;`
5			`unsigned short s;`
6
7			`int main () {`
8			`long t = l;`
9			`s = t;`
10			`if (s != (unsigned short)-2)`
11			`abort ();`
12			`exit (0);`
13			`}`

Browse

Tools

Subversion Repositories openrisc

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