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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [gcc.c-torture/] [execute/] [ieee/] [unsafe-fp-assoc.c] - Blame information for rev 825

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


#include <float.h>
 
extern void abort(void);
 
static const double C = DBL_MAX;
 
double foo(double x)
{
        return ( ( (x * C) * C ) * C);
}
 
int main ()
{
  double d = foo (0.0);
  if (d != 0.0)
   abort ();
 
  return 0;
}

Line No.	Rev	Author	Line
1	149	jeremybenn	`#include <float.h>`
2
3			`extern void abort(void);`
4
5			`static const double C = DBL_MAX;`
6
7			`double foo(double x)`
8			`{`
9			`return ( ( (x * C) * C ) * C);`
10			`}`
11
12			`int main ()`
13			`{`
14			`double d = foo (0.0);`
15			`if (d != 0.0)`
16			`abort ();`
17
18			`return 0;`
19			`}`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [gcc.c-torture/] [execute/] [ieee/] [unsafe-fp-assoc.c] - Blame information for rev 825