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/] [387-8.c] - Blame information for rev 329

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


/* Verify that 387 fptan instruction is generated. Also check that
   inherent load of 1.0 is used in further calculations.  */
 
/* { dg-do compile } */
/* { dg-require-effective-target ilp32 } */
/* { dg-options "-O2 -ffast-math -march=i686" } */
/* { dg-final { scan-assembler "fptan" } } */
/* { dg-final { scan-assembler-not "fld1" } } */
 
extern double tan (double);
 
double f1(double x)
{
  return 1.0 / tan(x);
}
 

Line No.	Rev	Author	Line
1	318	jeremybenn	`/* Verify that 387 fptan instruction is generated. Also check that`
2			`inherent load of 1.0 is used in further calculations. */`
3
4			`/* { dg-do compile } */`
5			`/* { dg-require-effective-target ilp32 } */`
6			`/* { dg-options "-O2 -ffast-math -march=i686" } */`
7			`/* { dg-final { scan-assembler "fptan" } } */`
8			`/* { dg-final { scan-assembler-not "fld1" } } */`
9
10			`extern double tan (double);`
11
12			`double f1(double x)`
13			`{`
14			`return 1.0 / tan(x);`
15			`}`
16

Browse

Tools

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [gcc.target/] [i386/] [387-8.c] - Blame information for rev 329