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

Subversion Repositories openrisc

[/] [openrisc/] [tags/] [gnu-src/] [gcc-4.5.1/] [gcc-4.5.1-or32-1.0rc1/] [gcc/] [testsuite/] [gcc.c-torture/] [execute/] [20020411-1.c] - Blame information for rev 338

Details | Compare with Previous | View Log


/* PR optimization/6177
   This testcase ICEd because expr.c did not expect to see a CONCAT
   as array rtl.  */
 
extern void abort (void);
extern void exit (int);
 
__complex__ float foo (void)
{
  __complex__ float f[1];
  __real__ f[0] = 1.0;
  __imag__ f[0] = 1.0;
  f[0] = __builtin_conjf (f[0]);
  return f[0];
}
 
int main (void)
{
  __complex__ double d[1];
  d[0] = foo ();
  if (__real__ d[0] != 1.0
      || __imag__ d[0] != -1.0)
    abort ();
  exit (0);
}

Line No.	Rev	Author	Line
1	297	jeremybenn	`/* PR optimization/6177`
2			`This testcase ICEd because expr.c did not expect to see a CONCAT`
3			`as array rtl. */`
4
5			`extern void abort (void);`
6			`extern void exit (int);`
7
8			`__complex__ float foo (void)`
9			`{`
10			`__complex__ float f[1];`
11			`__real__ f[0] = 1.0;`
12			`__imag__ f[0] = 1.0;`
13			`f[0] = __builtin_conjf (f[0]);`
14			`return f[0];`
15			`}`
16
17			`int main (void)`
18			`{`
19			`__complex__ double d[1];`
20			`d[0] = foo ();`
21			`if (__real__ d[0] != 1.0`
22			`\|\| __imag__ d[0] != -1.0)`
23			`abort ();`
24			`exit (0);`
25			`}`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [tags/] [gnu-src/] [gcc-4.5.1/] [gcc-4.5.1-or32-1.0rc1/] [gcc/] [testsuite/] [gcc.c-torture/] [execute/] [20020411-1.c] - Blame information for rev 338