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.c-torture/] [compile/] [pr34966.c] - Blame information for rev 378

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


extern double sin (double), cos (double);
 
__inline double
atan (double __x)
{
  register double __result;
#if defined(__i386__) || defined(__x86_64__)
  __asm __volatile__ ("" : "=t" (__result) : "0" (__x));
#else
  __result = __x;
#endif
  return __result;
}
 
double
f(double x)
{
  double t = atan (x);
  return cos (t) + sin (t);
}
 

Line No.	Rev	Author	Line
1	297	jeremybenn	`extern double sin (double), cos (double);`
2
3			`__inline double`
4			`atan (double __x)`
5			`{`
6			`register double __result;`
7			`#if defined(__i386__) \|\| defined(__x86_64__)`
8			`__asm __volatile__ ("" : "=t" (__result) : "0" (__x));`
9			`#else`
10			`__result = __x;`
11			`#endif`
12			`return __result;`
13			`}`
14
15			`double`
16			`f(double x)`
17			`{`
18			`double t = atan (x);`
19			`return cos (t) + sin (t);`
20			`}`
21

Browse

Tools

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [gcc.c-torture/] [compile/] [pr34966.c] - Blame information for rev 378