uc-sdk
Main Page
Related Pages
Modules
Classes
Files
File List
File Members
All
Classes
Files
Functions
Variables
Typedefs
Enumerations
Enumerator
Macros
Groups
Pages
w_log.c
Go to the documentation of this file.
1
2
/* @(#)w_log.c 1.3 95/01/18 */
3
/*
4
* ====================================================
5
* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
6
*
7
* Developed at SunSoft, a Sun Microsystems, Inc. business.
8
* Permission to use, copy, modify, and distribute this
9
* software is freely granted, provided that this notice
10
* is preserved.
11
* ====================================================
12
*/
13
14
/*
15
* wrapper log(x)
16
*/
17
18
#include "
fdlibm.h
"
19
20
21
#ifdef __STDC__
22
double
log
(
double
x)
/* wrapper log */
23
#else
24
double
log
(x)
/* wrapper log */
25
double x;
26
#endif
27
{
28
#ifdef _IEEE_LIBM
29
return
__ieee754_log
(x);
30
#else
31
double
z;
32
z =
__ieee754_log
(x);
33
if
(
_LIB_VERSION
==
_IEEE_
||
isnan
(x) || x > 0.0)
return
z;
34
if
(x==0.0)
35
return
__kernel_standard
(x,x,16);
/* log(0) */
36
else
37
return
__kernel_standard
(x,x,17);
/* log(x<0) */
38
#endif
39
}
libm
src
w_log.c
Generated on Fri Nov 15 2013 05:00:19 for uc-sdk by
1.8.4