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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [newlib-1.17.0/] [newlib/] [libm/] [math/] [wf_sincos.c] - Blame information for rev 825

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


/* sincos -- currently no more efficient than two separate calls to
   sin and cos. */
#include "fdlibm.h"
#include <errno.h>
 
#ifdef __STDC__
        void sincosf(float x, float *sinx, float *cosx)
#else
        void sincosf(x, sinx, cosx)
        float x;
        float *sinx;
        float *cosx;
#endif
{
  *sinx = sinf (x);
  *cosx = cosf (x);
}
 
#ifdef _DOUBLE_IS_32BITS
 
#ifdef __STDC__
        void sincos(double x, double *sinx, double *cosx)
#else
        void sincos(x, sinx, cosx)
        double x;
        double sinx;
        double cosx;
#endif
{
  *sinx = sinf((float) x);
  *cosx = cosf((float) x);
}
#endif /* defined(_DOUBLE_IS_32BITS) */

Line No.	Rev	Author	Line
1	148	jeremybenn	`/* sincos -- currently no more efficient than two separate calls to`
2			`sin and cos. */`
3			`#include "fdlibm.h"`
4			`#include <errno.h>`
5
6			`#ifdef __STDC__`
7			`void sincosf(float x, float sinx, float cosx)`
8			`#else`
9			`void sincosf(x, sinx, cosx)`
10			`float x;`
11			`float *sinx;`
12			`float *cosx;`
13			`#endif`
14			`{`
15			`*sinx = sinf (x);`
16			`*cosx = cosf (x);`
17			`}`
18
19			`#ifdef _DOUBLE_IS_32BITS`
20
21			`#ifdef __STDC__`
22			`void sincos(double x, double sinx, double cosx)`
23			`#else`
24			`void sincos(x, sinx, cosx)`
25			`double x;`
26			`double sinx;`
27			`double cosx;`
28			`#endif`
29			`{`
30			`*sinx = sinf((float) x);`
31			`*cosx = cosf((float) x);`
32			`}`
33			`#endif /* defined(_DOUBLE_IS_32BITS) */`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [newlib-1.17.0/] [newlib/] [libm/] [math/] [wf_sincos.c] - Blame information for rev 825