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

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [gcc.dg/] [struct/] [wo_prof_local_array.c] - Blame information for rev 298

Line No.	Rev	Author	Line
1	298	jeremybenn	`/* { dg-do compile } */`
2			`/* { dg-do run } */`
3
4			`#include <stdlib.h>`
5			`typedef struct`
6			`{`
7			`int a;`
8			`float b;`
9			`}str_t;`
10
11			`#ifdef STACK_SIZE`
12			`#if STACK_SIZE > 8000`
13			`#define N 1000`
14			`#else`
15			`#define N (STACK_SIZE/8)`
16			`#endif`
17			`#else`
18			`#define N 1000`
19			`#endif`
20
21			`int`
22			`main ()`
23			`{`
24			`int i;`
25			`str_t A[N];`
26
27			`for (i = 0; i < N; i++)`
28			`{`
29			`A[i].a = 0;`
30			`}`
31
32			`for (i = 0; i < N; i++)`
33			`if (A[i].a != 0)`
34			`abort ();`
35
36			`return 0;`
37			`}`
38
39			`/--------------------------------------------------------------------------/`
40			`/* { dg-final { scan-ipa-dump "Number of structures to transform is 1" "ipa_struct_reorg" { xfail { "avr--" } } } } */`
41			`/* { dg-final { cleanup-ipa-dump "" } } /`