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

Subversion Repositories openrisc

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

Line No.	Rev	Author	Line
1	688	jeremybenn	`struct tiny`
2			`{`
3			`int c;`
4			`};`
5
6			`f (int n, struct tiny x, struct tiny y, struct tiny z, long l)`
7			`{`
8			`if (x.c != 10)`
9			`abort();`
10
11			`if (y.c != 11)`
12			`abort();`
13
14			`if (z.c != 12)`
15			`abort();`
16
17			`if (l != 123)`
18			`abort ();`
19			`}`
20
21			`main ()`
22			`{`
23			`struct tiny x[3];`
24			`x[0].c = 10;`
25			`x[1].c = 11;`
26			`x[2].c = 12;`
27			`f (3, x[0], x[1], x[2], (long) 123);`
28			`exit(0);`
29			`}`
30