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

Subversion Repositories openrisc

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

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