diff options
Diffstat (limited to 'libm/s_erf.c')
| -rw-r--r-- | libm/s_erf.c | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/libm/s_erf.c b/libm/s_erf.c index 44568abb2..0d24e2174 100644 --- a/libm/s_erf.c +++ b/libm/s_erf.c @@ -112,6 +112,8 @@ static char rcsid[] = "$NetBSD: s_erf.c,v 1.8 1995/05/10 20:47:05 jtc Exp $"; #include "math.h" #include "math_private.h" +libm_hidden_proto(fabs) + #ifdef __STDC__ static const double #else @@ -191,6 +193,7 @@ sb5 = 2.55305040643316442583e+03, /* 0x40A3F219, 0xCEDF3BE6 */ sb6 = 4.74528541206955367215e+02, /* 0x407DA874, 0xE79FE763 */ sb7 = -2.24409524465858183362e+01; /* 0xC03670E2, 0x42712D62 */ +libm_hidden_proto(erf) #ifdef __STDC__ double erf(double x) #else @@ -246,7 +249,9 @@ sb7 = -2.24409524465858183362e+01; /* 0xC03670E2, 0x42712D62 */ r = __ieee754_exp(-z*z-0.5625)*__ieee754_exp((z-x)*(z+x)+R/S); if(hx>=0) return one-r/x; else return r/x-one; } +libm_hidden_def(erf) +libm_hidden_proto(erfc) #ifdef __STDC__ double erfc(double x) #else @@ -312,3 +317,4 @@ sb7 = -2.24409524465858183362e+01; /* 0xC03670E2, 0x42712D62 */ if(hx>0) return tiny*tiny; else return two-tiny; } } +libm_hidden_def(erfc) |