URL https://opencores.org/ocsvn/openrisc_2011-10-31/openrisc_2011-10-31/trunk

Subversion Repositories openrisc_2011-10-31

[/] [openrisc/] [tags/] [gnu-src/] [gcc-4.5.1/] [gcc-4.5.1-or32-1.0rc1/] [gcc/] [testsuite/] [gcc.c-torture/] [compile/] [pr42196-2.c] - Blame information for rev 338

Details | Compare with Previous | View Log


union U
{
  __complex__ int ci;
  __complex__ float cf;
};
 
float gd;
extern float bar (union U);
 
float foo (int b, double f1, double f2, int c1, int c2)
{
  union U u;
  double r;
 
  if (b)
    {
      __real__ u.cf = f1;
      __imag__ u.cf = f2;
    }
  else
    {
      __real__ u.ci = c1;
      __imag__ u.ci = c2;
    }
 
  r = bar (u);
  return r;
}

Line No.	Rev	Author	Line
1	297	jeremybenn	`union U`
2			`{`
3			`__complex__ int ci;`
4			`__complex__ float cf;`
5			`};`
6
7			`float gd;`
8			`extern float bar (union U);`
9
10			`float foo (int b, double f1, double f2, int c1, int c2)`
11			`{`
12			`union U u;`
13			`double r;`
14
15			`if (b)`
16			`{`
17			`__real__ u.cf = f1;`
18			`__imag__ u.cf = f2;`
19			`}`
20			`else`
21			`{`
22			`__real__ u.ci = c1;`
23			`__imag__ u.ci = c2;`
24			`}`
25
26			`r = bar (u);`
27			`return r;`
28			`}`

Browse

Tools

Subversion Repositories openrisc_2011-10-31

[/] [openrisc/] [tags/] [gnu-src/] [gcc-4.5.1/] [gcc-4.5.1-or32-1.0rc1/] [gcc/] [testsuite/] [gcc.c-torture/] [compile/] [pr42196-2.c] - Blame information for rev 338