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

Subversion Repositories openrisc

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

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