OpenCores
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 414

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

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
 

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.