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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [compat/] [struct-ret-1.c] - Blame information for rev 801

Go to most recent revision | Details | Compare with Previous | View Log


typedef struct { int re; int im; } T;
 
T f (int, int);
 
#if COMPILER != 1
T
f (int arg1, int arg2)
{
  T x;
  x.re = arg1;
  x.im = arg2;
  return x;
}
#endif
 
#if COMPILER != 2
main ()
{
  T result;
  result = f (3, 4);
  if (result.re != 3 || result.im != 4)
    abort ();
  exit (0);
}
#endif

Line No.	Rev	Author	Line
1	688	jeremybenn	`typedef struct { int re; int im; } T;`
2
3			`T f (int, int);`
4
5			`#if COMPILER != 1`
6			`T`
7			`f (int arg1, int arg2)`
8			`{`
9			`T x;`
10			`x.re = arg1;`
11			`x.im = arg2;`
12			`return x;`
13			`}`
14			`#endif`
15
16			`#if COMPILER != 2`
17			`main ()`
18			`{`
19			`T result;`
20			`result = f (3, 4);`
21			`if (result.re != 3 \|\| result.im != 4)`
22			`abort ();`
23			`exit (0);`
24			`}`
25			`#endif`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [compat/] [struct-ret-1.c] - Blame information for rev 801