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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-stable/] [gcc-4.5.1/] [gcc/] [testsuite/] [gcc.dg/] [20031216-1.c] - Diff between revs 816 and 826

Rev 816	Rev 826
`/* This used to abort due to a loop bug on s390. /`	`/* This used to abort due to a loop bug on s390. /`

`/* { dg-do run } */`	`/* { dg-do run } */`
`/* { dg-options "-O2" } */`	`/* { dg-options "-O2" } */`
`/* { dg-options "-O2 -fPIC" { target s390--* } } */`	`/* { dg-options "-O2 -fPIC" { target s390--* } } */`

`extern void abort (void);`	`extern void abort (void);`

`int count = 0;`	`int count = 0;`
`char *str;`	`char *str;`

`void test (int flag)`	`void test (int flag)`
`{`	`{`
`char *p;`	`char *p;`

`for (;;)`	`for (;;)`
`{`	`{`
`if (count > 5)`	`if (count > 5)`
`return;`	`return;`

`p = "test";`	`p = "test";`

`if (flag)`	`if (flag)`
`count++;`	`count++;`

`str = p;`	`str = p;`
`}`	`}`
`}`	`}`

`int main (void)`	`int main (void)`
`{`	`{`
`test (1);`	`test (1);`

`if (str[0] != 't')`	`if (str[0] != 't')`
`abort ();`	`abort ();`

`return 0;`	`return 0;`
`}`	`}`