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/] [pr27827.c] - Blame information for rev 325

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


/* { dg-do compile } */
/* { dg-require-effective-target ilp32 } */
/* { dg-options "-O2 -mfpmath=387" } */
 
double a, b;
double f(double c)
{
  double x = a * b;
  return x + c * a;
}
 
/* { dg-final { scan-assembler-not "fld\[ \t\]*%st" } } */
/* { dg-final { scan-assembler "fmul\[ \t\]*%st" } } */

Line No.	Rev	Author	Line
1	318	jeremybenn	`/* { dg-do compile } */`
2			`/* { dg-require-effective-target ilp32 } */`
3			`/* { dg-options "-O2 -mfpmath=387" } */`
4
5			`double a, b;`
6			`double f(double c)`
7			`{`
8			`double x = a * b;`
9			`return x + c * a;`
10			`}`
11
12			`/* { dg-final { scan-assembler-not "fld\[ \t\]%st" } } /`
13			`/* { dg-final { scan-assembler "fmul\[ \t\]%st" } } /`

Browse

Tools

Subversion Repositories openrisc_me

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