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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.target/] [i386/] [387-7.c] - Blame information for rev 764

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


/* Verify that 387 fsincos instruction is generated.  */
/* { dg-do compile } */
/* { dg-options "-O -ffast-math -mfpmath=387 -mfancy-math-387" } */
/* { dg-final { scan-assembler "fsincos" } } */
 
extern double sin (double);
extern double cos (double);
 
double f1(double x)
{
  return sin(x) + cos (x);
}
 

Line No.	Rev	Author	Line
1	691	jeremybenn	`/* Verify that 387 fsincos instruction is generated. */`
2			`/* { dg-do compile } */`
3			`/* { dg-options "-O -ffast-math -mfpmath=387 -mfancy-math-387" } */`
4			`/* { dg-final { scan-assembler "fsincos" } } */`
5
6			`extern double sin (double);`
7			`extern double cos (double);`
8
9			`double f1(double x)`
10			`{`
11			`return sin(x) + cos (x);`
12			`}`
13

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.target/] [i386/] [387-7.c] - Blame information for rev 764