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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [gcc.dg/] [vmx/] [gcc-bug-e.c] - Blame information for rev 853

Line No.	Rev	Author	Line
1	149	jeremybenn	`#include "harness.h"`
2
3			`typedef struct n_a`
4			`{`
5			`signed char m1;`
6			`short m2;`
7			`int m3;`
8			`double m4;`
9			`vector float m5;`
10			`}`
11			`n_a;`
12
13			`static void`
14			`initn_a(signed char p1, short p2, int p3, double p4, vector float p5)`
15			`{`
16			`n_a i;`
17			`static struct`
18			`{`
19			`n_a b;`
20			`char a;`
21			`}`
22			`x;`
23
24			`i.m1 = p1;`
25			`i.m2 = p2;`
26			`i.m3 = p3;`
27			`i.m4 = p4;`
28			`i.m5 = p5;`
29
30			`check(i.m1 == -17, "i.m1");`
31			`check(i.m2 == 9165, "i.m2");`
32			`check(i.m3 == -1857760764, "i.m3");`
33			`check(i.m4 == 7.3e+18, "i.m4");`
34			`check(vec_all_eq(i.m5, ((vector float){-5.02e+08,`
35			`-4.34e+08,`
36			`-1.04e+09,`
37			`1.42e+09})), "i.m5");`
38			`}`
39
40			`static void test()`
41			`{`
42			`initn_a(-17, 9165, -1857760764, 7.3e+18,`
43			`((vector float){-5.02e+08, -4.34e+08, -1.04e+09, 1.42e+09}));`
44			`}`