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

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [newlib-1.18.0/] [newlib/] [libm/] [math/] [w_sincos.c] - Blame information for rev 258

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>
 
#ifndef _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 = sin (x);
  *cosx = cos (x);
}
 
#endif /* defined(_DOUBLE_IS_32BITS) */

Line No.	Rev	Author	Line
1	207	jeremybenn	`/* sincos -- currently no more efficient than two separate calls to`
2			`sin and cos. */`
3
4			`#include "fdlibm.h"`
5			`#include <errno.h>`
6
7			`#ifndef _DOUBLE_IS_32BITS`
8
9			`#ifdef __STDC__`
10			`void sincos(double x, double sinx, double cosx)`
11			`#else`
12			`void sincos(x, sinx, cosx)`
13			`double x;`
14			`double *sinx;`
15			`double *cosx;`
16			`#endif`
17			`{`
18			`*sinx = sin (x);`
19			`*cosx = cos (x);`
20			`}`
21
22			`#endif /* defined(_DOUBLE_IS_32BITS) */`

Browse

Tools

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [newlib-1.18.0/] [newlib/] [libm/] [math/] [w_sincos.c] - Blame information for rev 258