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.target/] [i386/] [pr17390.c] - Blame information for rev 318

Details | Compare with Previous | View Log


/* { dg-do compile } */
/* { dg-options "-O2 -ffast-math -mfpmath=387" } */
 
double sgn (double __x)
{
  return __x == 0.0 ? 0.0 : (__x > 0.0 ? 1.0 : -1.0);
}
 
/* { dg-final { scan-assembler-times "fcom|ftst" 1 } } */

Line No.	Rev	Author	Line
1	318	jeremybenn	`/* { dg-do compile } */`
2			`/* { dg-options "-O2 -ffast-math -mfpmath=387" } */`
3
4			`double sgn (double __x)`
5			`{`
6			`return __x == 0.0 ? 0.0 : (__x > 0.0 ? 1.0 : -1.0);`
7			`}`
8
9			`/* { dg-final { scan-assembler-times "fcom\|ftst" 1 } } */`

Browse

Tools

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [gcc.target/] [i386/] [pr17390.c] - Blame information for rev 318