Browse Source

All math related relocs gone

Peter S. Mazinger 18 years ago
parent
commit
9cc29786d7
81 changed files with 272 additions and 28 deletions
  1. 3 0
      libm/e_acosh.c
  2. 2 0
      libm/e_asin.c
  3. 3 0
      libm/e_atan2.c
  4. 2 0
      libm/e_atanh.c
  5. 3 0
      libm/e_cosh.c
  6. 1 0
      libm/e_gamma.c
  7. 5 0
      libm/e_j0.c
  8. 5 0
      libm/e_j1.c
  9. 5 0
      libm/e_jn.c
  10. 1 0
      libm/e_lgamma.c
  11. 3 0
      libm/e_lgamma_r.c
  12. 3 0
      libm/e_pow.c
  13. 2 0
      libm/e_rem_pio2.c
  14. 2 0
      libm/e_remainder.c
  15. 5 0
      libm/e_scalb.c
  16. 3 0
      libm/e_sinh.c
  17. 56 0
      libm/float_wrappers.c
  18. 18 8
      libm/fpmacros.c
  19. 3 0
      libm/k_rem_pio2.c
  20. 4 0
      libm/k_standard.c
  21. 3 0
      libm/k_tan.c
  22. 2 1
      libm/powerpc/s_ceil.c
  23. 2 0
      libm/powerpc/s_copysign.c
  24. 2 1
      libm/powerpc/s_floor.c
  25. 2 1
      libm/powerpc/s_frexp.c
  26. 2 1
      libm/powerpc/s_ldexp.c
  27. 2 1
      libm/powerpc/s_logb.c
  28. 2 0
      libm/powerpc/s_modf.c
  29. 2 0
      libm/powerpc/s_nearbyint.c
  30. 2 1
      libm/powerpc/s_rint.c
  31. 2 0
      libm/powerpc/s_round.c
  32. 2 0
      libm/powerpc/s_trunc.c
  33. 2 0
      libm/powerpc/w_scalb.c
  34. 5 0
      libm/s_asinh.c
  35. 4 0
      libm/s_atan.c
  36. 2 0
      libm/s_cbrt.c
  37. 2 1
      libm/s_ceil.c
  38. 2 1
      libm/s_copysign.c
  39. 2 0
      libm/s_cos.c
  40. 6 0
      libm/s_erf.c
  41. 2 0
      libm/s_expm1.c
  42. 2 0
      libm/s_fabs.c
  43. 3 1
      libm/s_finite.c
  44. 2 0
      libm/s_floor.c
  45. 2 0
      libm/s_frexp.c
  46. 2 0
      libm/s_ilogb.c
  47. 5 0
      libm/s_ldexp.c
  48. 2 1
      libm/s_llround.c
  49. 2 0
      libm/s_log1p.c
  50. 4 0
      libm/s_logb.c
  51. 2 1
      libm/s_lround.c
  52. 2 0
      libm/s_matherr.c
  53. 2 0
      libm/s_modf.c
  54. 2 0
      libm/s_nextafter.c
  55. 2 0
      libm/s_rint.c
  56. 2 1
      libm/s_round.c
  57. 4 0
      libm/s_scalbn.c
  58. 2 0
      libm/s_signgam.c
  59. 2 0
      libm/s_significand.c
  60. 2 0
      libm/s_sin.c
  61. 2 0
      libm/s_tan.c
  62. 5 0
      libm/s_tanh.c
  63. 2 1
      libm/w_acos.c
  64. 2 0
      libm/w_acosh.c
  65. 2 0
      libm/w_asin.c
  66. 2 1
      libm/w_atan2.c
  67. 2 1
      libm/w_atanh.c
  68. 2 0
      libm/w_cabs.c
  69. 2 0
      libm/w_cosh.c
  70. 2 0
      libm/w_drem.c
  71. 2 0
      libm/w_exp.c
  72. 2 1
      libm/w_fmod.c
  73. 1 0
      libm/w_gamma.c
  74. 2 1
      libm/w_hypot.c
  75. 3 0
      libm/w_lgamma.c
  76. 2 1
      libm/w_log.c
  77. 2 1
      libm/w_log10.c
  78. 2 1
      libm/w_pow.c
  79. 2 0
      libm/w_remainder.c
  80. 2 0
      libm/w_sinh.c
  81. 2 0
      libm/w_sqrt.c

+ 3 - 0
libm/e_acosh.c

@@ -31,6 +31,9 @@ static char rcsid[] = "$NetBSD: e_acosh.c,v 1.9 1995/05/12 04:57:18 jtc Exp $";
 #include "math.h"
 #include "math_private.h"
 
+libm_hidden_proto(log1p)
+libm_hidden_proto(sqrt)
+
 #ifdef __STDC__
 static const double
 #else

+ 2 - 0
libm/e_asin.c

@@ -48,6 +48,8 @@ static char rcsid[] = "$NetBSD: e_asin.c,v 1.9 1995/05/12 04:57:22 jtc Exp $";
 #include "math.h"
 #include "math_private.h"
 
+libm_hidden_proto(fabs)
+
 #ifdef __STDC__
 static const double
 #else

+ 3 - 0
libm/e_atan2.c

@@ -44,6 +44,9 @@ static char rcsid[] = "$NetBSD: e_atan2.c,v 1.8 1995/05/10 20:44:51 jtc Exp $";
 #include "math.h"
 #include "math_private.h"
 
+libm_hidden_proto(atan)
+libm_hidden_proto(fabs)
+
 #ifdef __STDC__
 static const double
 #else

+ 2 - 0
libm/e_atanh.c

@@ -35,6 +35,8 @@ static char rcsid[] = "$NetBSD: e_atanh.c,v 1.8 1995/05/10 20:44:55 jtc Exp $";
 #include "math.h"
 #include "math_private.h"
 
+libm_hidden_proto(log1p)
+
 #ifdef __STDC__
 static const double one = 1.0, huge = 1e300;
 #else

+ 3 - 0
libm/e_cosh.c

@@ -38,6 +38,9 @@ static char rcsid[] = "$NetBSD: e_cosh.c,v 1.7 1995/05/10 20:44:58 jtc Exp $";
 #include "math.h"
 #include "math_private.h"
 
+libm_hidden_proto(expm1)
+libm_hidden_proto(fabs)
+
 #ifdef __STDC__
 static const double one = 1.0, half=0.5, huge = 1.0e300;
 #else

+ 1 - 0
libm/e_gamma.c

@@ -21,6 +21,7 @@
 #include "math_private.h"
 
 extern int signgam;
+libm_hidden_proto(signgam)
 
 #ifdef __STDC__
 	//__private_extern__

+ 5 - 0
libm/e_j0.c

@@ -62,6 +62,11 @@ static char rcsid[] = "$NetBSD: e_j0.c,v 1.8 1995/05/10 20:45:23 jtc Exp $";
 #include "math.h"
 #include "math_private.h"
 
+libm_hidden_proto(sin)
+libm_hidden_proto(cos)
+libm_hidden_proto(sqrt)
+libm_hidden_proto(fabs)
+
 #ifdef __STDC__
 static double pzero(double), qzero(double);
 #else

+ 5 - 0
libm/e_j1.c

@@ -62,6 +62,11 @@ static char rcsid[] = "$NetBSD: e_j1.c,v 1.8 1995/05/10 20:45:27 jtc Exp $";
 #include "math.h"
 #include "math_private.h"
 
+libm_hidden_proto(sin)
+libm_hidden_proto(cos)
+libm_hidden_proto(sqrt)
+libm_hidden_proto(fabs)
+
 #ifdef __STDC__
 static double pone(double), qone(double);
 #else

+ 5 - 0
libm/e_jn.c

@@ -43,6 +43,11 @@ static char rcsid[] = "$NetBSD: e_jn.c,v 1.9 1995/05/10 20:45:34 jtc Exp $";
 #include "math.h"
 #include "math_private.h"
 
+libm_hidden_proto(sin)
+libm_hidden_proto(cos)
+libm_hidden_proto(sqrt)
+libm_hidden_proto(fabs)
+
 #ifdef __STDC__
 static const double
 #else

+ 1 - 0
libm/e_lgamma.c

@@ -21,6 +21,7 @@
 #include "math_private.h"
 
 extern int signgam;
+libm_hidden_proto(signgam)
 
 #ifdef __STDC__
 	//__private_extern__

+ 3 - 0
libm/e_lgamma_r.c

@@ -84,6 +84,9 @@ static char rcsid[] = "$NetBSD: e_lgamma_r.c,v 1.7 1995/05/10 20:45:42 jtc Exp $
 #include "math.h"
 #include "math_private.h"
 
+libm_hidden_proto(floor)
+libm_hidden_proto(fabs)
+
 #ifdef __STDC__
 static const double
 #else

+ 3 - 0
libm/e_pow.c

@@ -62,6 +62,9 @@ static char rcsid[] = "$NetBSD: e_pow.c,v 1.9 1995/05/12 04:57:32 jtc Exp $";
 #include "math.h"
 #include "math_private.h"
 
+libm_hidden_proto(scalbn)
+libm_hidden_proto(fabs)
+
 #ifdef __STDC__
 static const double
 #else

+ 2 - 0
libm/e_rem_pio2.c

@@ -23,6 +23,8 @@ static char rcsid[] = "$NetBSD: e_rem_pio2.c,v 1.8 1995/05/10 20:46:02 jtc Exp $
 #include "math.h"
 #include "math_private.h"
 
+libm_hidden_proto(fabs)
+
 /*
  * Table of constants for 2/pi, 396 Hex digits (476 decimal) of 2/pi
  */

+ 2 - 0
libm/e_remainder.c

@@ -26,6 +26,8 @@ static char rcsid[] = "$NetBSD: e_remainder.c,v 1.8 1995/05/10 20:46:05 jtc Exp
 #include "math.h"
 #include "math_private.h"
 
+libm_hidden_proto(fabs)
+
 #ifdef __STDC__
 static const double zero = 0.0;
 #else

+ 5 - 0
libm/e_scalb.c

@@ -23,6 +23,11 @@ static char rcsid[] = "$NetBSD: e_scalb.c,v 1.6 1995/05/10 20:46:09 jtc Exp $";
 #include "math.h"
 #include "math_private.h"
 
+libm_hidden_proto(scalbn)
+libm_hidden_proto(finite)
+libm_hidden_proto(rint)
+libm_hidden_proto(__isnan)
+
 #ifdef _SCALB_INT
 #ifdef __STDC__
 	double attribute_hidden __ieee754_scalb(double x, int fn)

+ 3 - 0
libm/e_sinh.c

@@ -35,6 +35,9 @@ static char rcsid[] = "$NetBSD: e_sinh.c,v 1.7 1995/05/10 20:46:13 jtc Exp $";
 #include "math.h"
 #include "math_private.h"
 
+libm_hidden_proto(expm1)
+libm_hidden_proto(fabs)
+
 #ifdef __STDC__
 static const double one = 1.0, shuge = 1.0e307;
 #else

+ 56 - 0
libm/float_wrappers.c

@@ -77,6 +77,7 @@ float       tanhf(float);
 
 
 #ifdef L_acosf
+libm_hidden_proto(acos)
 float acosf (float x)
 {
 	return (float) acos( (double)x );
@@ -85,6 +86,7 @@ float acosf (float x)
 
 
 #ifdef L_acoshf
+libm_hidden_proto(acosh)
 float acoshf (float x)
 {
 	return (float) acosh( (double)x );
@@ -93,6 +95,7 @@ float acoshf (float x)
 
 
 #ifdef L_asinf
+libm_hidden_proto(asin)
 float asinf (float x)
 {
 	return (float) asin( (double)x );
@@ -101,6 +104,7 @@ float asinf (float x)
 
 
 #ifdef L_asinhf
+libm_hidden_proto(asinh)
 float asinhf (float x)
 {
 	return (float) asinh( (double)x );
@@ -109,6 +113,7 @@ float asinhf (float x)
 
 
 #ifdef L_atan2f
+libm_hidden_proto(atan2)
 float atan2f (float x, float y)
 {
 	return (float) atan2( (double)x, (double)y );
@@ -117,6 +122,7 @@ float atan2f (float x, float y)
 
 
 #ifdef L_atanf
+libm_hidden_proto(atan)
 float atanf (float x)
 {
 	return (float) atan( (double)x );
@@ -125,6 +131,7 @@ float atanf (float x)
 
 
 #ifdef L_atanhf
+libm_hidden_proto(atanh)
 float atanhf (float x)
 {
 	return (float) atanh( (double)x );
@@ -133,6 +140,7 @@ float atanhf (float x)
 
 
 #ifdef L_cbrtf
+libm_hidden_proto(cbrt)
 float cbrtf (float x)
 {
 	return (float) cbrt( (double)x );
@@ -141,6 +149,7 @@ float cbrtf (float x)
 
 
 #ifdef L_ceilf
+libm_hidden_proto(ceil)
 float ceilf (float x)
 {
 	return (float) ceil( (double)x );
@@ -149,6 +158,7 @@ float ceilf (float x)
 
 
 #ifdef L_copysignf
+libm_hidden_proto(copysign)
 float copysignf (float x, float y)
 {
 	return (float) copysign( (double)x, (double)y );
@@ -157,6 +167,7 @@ float copysignf (float x, float y)
 
 
 #ifdef L_cosf
+libm_hidden_proto(cos)
 float cosf (float x)
 {
 	return (float) cos( (double)x );
@@ -165,6 +176,7 @@ float cosf (float x)
 
 
 #ifdef L_coshf
+libm_hidden_proto(cosh)
 float coshf (float x)
 {
 	return (float) cosh( (double)x );
@@ -173,6 +185,7 @@ float coshf (float x)
 
 
 #ifdef L_erfcf
+libm_hidden_proto(erfc)
 float erfcf (float x)
 {
 	return (float) erfc( (double)x );
@@ -181,6 +194,7 @@ float erfcf (float x)
 
 
 #ifdef L_erff
+libm_hidden_proto(erf)
 float erff (float x)
 {
 	return (float) erf( (double)x );
@@ -189,6 +203,7 @@ float erff (float x)
 
 
 #ifdef L_exp2f
+libm_hidden_proto(exp2)
 float exp2f (float x)
 {
 	return (float) exp2( (double)x );
@@ -197,6 +212,7 @@ float exp2f (float x)
 
 
 #ifdef L_expf
+libm_hidden_proto(exp)
 float expf (float x)
 {
 	return (float) exp( (double)x );
@@ -205,6 +221,7 @@ float expf (float x)
 
 
 #ifdef L_expm1f
+libm_hidden_proto(expm1)
 float expm1f (float x)
 {
 	return (float) expm1( (double)x );
@@ -213,6 +230,7 @@ float expm1f (float x)
 
 
 #ifdef L_fabsf
+libm_hidden_proto(fabs)
 float fabsf (float x)
 {
 	return (float) fabs( (double)x );
@@ -221,6 +239,7 @@ float fabsf (float x)
 
 
 #ifdef L_fdimf
+libm_hidden_proto(fdim)
 float fdimf (float x, float y)
 {
 	return (float) fdim( (double)x, (double)y );
@@ -229,6 +248,7 @@ float fdimf (float x, float y)
 
 
 #ifdef L_floorf
+libm_hidden_proto(floor)
 float floorf (float x)
 {
 	return (float) floor( (double)x );
@@ -237,6 +257,7 @@ float floorf (float x)
 
 
 #ifdef L_fmaf
+libm_hidden_proto(fma)
 float fmaf (float x, float y, float z)
 {
 	return (float) fma( (double)x, (double)y, (double)z );
@@ -245,6 +266,7 @@ float fmaf (float x, float y, float z)
 
 
 #ifdef L_fmaxf
+libm_hidden_proto(fmax)
 float fmaxf (float x, float y)
 {
 	return (float) fmax( (double)x, (double)y );
@@ -253,6 +275,7 @@ float fmaxf (float x, float y)
 
 
 #ifdef L_fminf
+libm_hidden_proto(fmin)
 float fminf (float x, float y)
 {
 	return (float) fmin( (double)x, (double)y );
@@ -261,6 +284,7 @@ float fminf (float x, float y)
 
 
 #ifdef L_fmodf
+libm_hidden_proto(fmod)
 float fmodf (float x, float y)
 {
 	return (float) fmod( (double)x, (double)y );
@@ -269,6 +293,7 @@ float fmodf (float x, float y)
 
 
 #ifdef L_frexpf
+libm_hidden_proto(frexp)
 float frexpf (float x, int *exp)
 {
 	return (float) frexp( (double)x, exp );
@@ -277,6 +302,7 @@ float frexpf (float x, int *exp)
 
 
 #ifdef L_hypotf
+libm_hidden_proto(hypot)
 float hypotf (float x, float y)
 {
 	return (float) hypot( (double)x, (double)y );
@@ -285,6 +311,7 @@ float hypotf (float x, float y)
 
 
 #ifdef L_ilogbf
+libm_hidden_proto(ilogb)
 int ilogbf (float x)
 {
 	return (float) ilogb( (double)x );
@@ -293,6 +320,7 @@ int ilogbf (float x)
 
 
 #ifdef L_ldexpf
+libm_hidden_proto(ldexp)
 float ldexpf (float x, int exp)
 {
 	return (float) ldexp( (double)x, exp );
@@ -301,6 +329,7 @@ float ldexpf (float x, int exp)
 
 
 #ifdef L_lgammaf
+libm_hidden_proto(lgamma)
 float lgammaf (float x)
 {
 	return (float) lgamma( (double)x );
@@ -309,6 +338,7 @@ float lgammaf (float x)
 
 
 #ifdef L_llrintf
+libm_hidden_proto(llrint)
 long long llrintf (float x)
 {
 	return (float) llrint( (double)x );
@@ -317,6 +347,7 @@ long long llrintf (float x)
 
 
 #ifdef L_llroundf
+libm_hidden_proto(llround)
 long long llroundf (float x)
 {
 	return (float) llround( (double)x );
@@ -325,6 +356,7 @@ long long llroundf (float x)
 
 
 #ifdef L_log10f
+libm_hidden_proto(log10)
 float log10f (float x)
 {
 	return (float) log10( (double)x );
@@ -333,6 +365,7 @@ float log10f (float x)
 
 
 #ifdef L_log1pf
+libm_hidden_proto(log1p)
 float log1pf (float x)
 {
 	return (float) log1p( (double)x );
@@ -341,6 +374,7 @@ float log1pf (float x)
 
 
 #ifdef L_log2f
+libm_hidden_proto(log2)
 float log2f (float x)
 {
 	return (float) log2( (double)x );
@@ -349,6 +383,7 @@ float log2f (float x)
 
 
 #ifdef L_logbf
+libm_hidden_proto(logb)
 float logbf (float x)
 {
 	return (float) logb( (double)x );
@@ -357,6 +392,7 @@ float logbf (float x)
 
 
 #ifdef L_logf
+libm_hidden_proto(log)
 float logf (float x)
 {
 	return (float) log( (double)x );
@@ -365,6 +401,7 @@ float logf (float x)
 
 
 #ifdef L_lrintf
+libm_hidden_proto(lrint)
 long lrintf (float x)
 {
 	return (float) lrint( (double)x );
@@ -373,6 +410,7 @@ long lrintf (float x)
 
 
 #ifdef L_lroundf
+libm_hidden_proto(lround)
 long lroundf (float x)
 {
 	return (float) lround( (double)x );
@@ -381,6 +419,7 @@ long lroundf (float x)
 
 
 #ifdef L_modff
+libm_hidden_proto(modf)
 float modff (float x, float *iptr)
 {
 	double y, result;
@@ -393,6 +432,7 @@ float modff (float x, float *iptr)
 
 
 #ifdef L_nearbyintf
+libm_hidden_proto(nearbyint)
 float nearbyintf (float x)
 {
 	return (float) nearbyint( (double)x );
@@ -401,6 +441,7 @@ float nearbyintf (float x)
 
 
 #ifdef L_nextafterf
+libm_hidden_proto(nextafter)
 float nextafterf (float x, float y)
 {
 	return (float) nextafter( (double)x, (double)y );
@@ -409,6 +450,7 @@ float nextafterf (float x, float y)
 
 
 #ifdef L_nexttowardf
+libm_hidden_proto(nexttoward)
 float nexttowardf (float x, long double y)
 {
 	return (float) nexttoward( (double)x, (double)y );
@@ -417,6 +459,7 @@ float nexttowardf (float x, long double y)
 
 
 #ifdef L_powf
+libm_hidden_proto(pow)
 float powf (float x, float y)
 {
 	return (float) pow( (double)x, (double)y );
@@ -425,6 +468,7 @@ float powf (float x, float y)
 
 
 #ifdef L_remainderf
+libm_hidden_proto(remainder)
 float remainderf (float x, float y)
 {
 	return (float) remainder( (double)x, (double)y );
@@ -433,6 +477,7 @@ float remainderf (float x, float y)
 
 
 #ifdef L_remquof
+libm_hidden_proto(remquo)
 float remquof (float x, float y, int *quo)
 {
 	return (float) remquo( (double)x, (double)y, quo );
@@ -441,6 +486,7 @@ float remquof (float x, float y, int *quo)
 
 
 #ifdef L_rintf
+libm_hidden_proto(rint)
 float rintf (float x)
 {
 	return (float) rint( (double)x );
@@ -449,6 +495,7 @@ float rintf (float x)
 
 
 #ifdef L_roundf
+libm_hidden_proto(round)
 float roundf (float x)
 {
 	return (float) round( (double)x );
@@ -457,6 +504,7 @@ float roundf (float x)
 
 
 #ifdef L_scalblnf
+libm_hidden_proto(scalbln)
 float scalblnf (float x, long exp)
 {
 	return (float) scalbln( (double)x, exp );
@@ -465,6 +513,7 @@ float scalblnf (float x, long exp)
 
 
 #ifdef L_scalbnf
+libm_hidden_proto(scalbn)
 float scalbnf (float x, int exp)
 {
 	return (float) scalbn( (double)x, exp );
@@ -473,6 +522,7 @@ float scalbnf (float x, int exp)
 
 
 #ifdef L_sinf
+libm_hidden_proto(sin)
 float sinf (float x)
 {
 	return (float) sin( (double)x );
@@ -481,6 +531,7 @@ float sinf (float x)
 
 
 #ifdef L_sinhf
+libm_hidden_proto(sinh)
 float sinhf (float x)
 {
 	return (float) sinh( (double)x );
@@ -489,6 +540,7 @@ float sinhf (float x)
 
 
 #ifdef L_sqrtf
+libm_hidden_proto(sqrt)
 float sqrtf (float x)
 {
 	return (float) sqrt( (double)x );
@@ -497,6 +549,7 @@ float sqrtf (float x)
 
 
 #ifdef L_tanf
+libm_hidden_proto(tan)
 float tanf (float x)
 {
 	return (float) tan( (double)x );
@@ -505,6 +558,7 @@ float tanf (float x)
 
 
 #ifdef L_tanhf
+libm_hidden_proto(tanh)
 float tanhf (float x)
 {
 	return (float) tanh( (double)x );
@@ -513,6 +567,7 @@ float tanhf (float x)
 
 
 #ifdef L_tgammaf
+libm_hidden_proto(tgamma)
 float tgammaf (float x)
 {
 	return (float) tgamma( (double)x );
@@ -521,6 +576,7 @@ float tgammaf (float x)
 
 
 #ifdef L_truncf
+libm_hidden_proto(trunc)
 float truncf (float x)
 {
 	return (float) trunc( (double)x );

+ 18 - 8
libm/fpmacros.c

@@ -40,6 +40,7 @@
    Calls:  none
 ***********************************************************************/
 
+libm_hidden_proto(__fpclassifyf)
 int __fpclassifyf ( float x )
 {
    unsigned int iexp;
@@ -66,6 +67,7 @@ int __fpclassifyf ( float x )
    else
       return FP_SUBNORMAL;        /* must be subnormal */
 }
+libm_hidden_def(__fpclassifyf)
 
 
 /***********************************************************************
@@ -78,6 +80,7 @@ int __fpclassifyf ( float x )
    Calls:  none
 ***********************************************************************/
 
+libm_hidden_proto(__fpclassify)
 int __fpclassify ( double arg )
 {
 	register unsigned int exponent;
@@ -106,6 +109,7 @@ int __fpclassify ( double arg )
 			return FP_SUBNORMAL;
 		}
 }
+libm_hidden_def(__fpclassify)
 
 
 /***********************************************************************
@@ -158,14 +162,14 @@ int __finitef ( float x )
    z.fval = x;
    return ((z.lval & FEXP_MASK) != FEXP_MASK);
 }
-weak_alias (__finitef, finitef)
+strong_alias(__finitef,finitef)
 
 #if 0 /* use __finite in s_finite.c */
 int __finite ( double x )
 {
 	return ( __fpclassify ( x ) >= FP_ZERO );
 }
-weak_alias (__finite, finite)
+strong_alias(__finite,finite)
 #endif
 
 
@@ -178,6 +182,7 @@ weak_alias (__finite, finite)
    Calls:  none
 ***********************************************************************/
 
+libm_hidden_proto(__signbitf)
 int __signbitf ( float x )
 {
    union {
@@ -188,6 +193,7 @@ int __signbitf ( float x )
    z.fval = x;
    return ((z.lval & SIGN_MASK) != 0);
 }
+libm_hidden_def(__signbitf)
 
 
 /***********************************************************************
@@ -197,6 +203,7 @@ int __signbitf ( float x )
    Calls:  none
 ***********************************************************************/
 
+libm_hidden_proto(__signbit)
 int __signbit ( double arg )
 {
       union
@@ -210,6 +217,7 @@ int __signbit ( double arg )
       sign = ( ( x.hex.high & dSgnMask ) == dSgnMask ) ? 1 : 0;
       return sign;
 }
+libm_hidden_def(__signbit)
 
 
 /***********************************************************************
@@ -227,7 +235,7 @@ int __isinff ( float x )
     }
     return 0;
 }
-weak_alias (__isinff, isinff)
+strong_alias(__isinff,isinff)
 
 int __isinf ( double x )
 {
@@ -237,7 +245,7 @@ int __isinf ( double x )
     }
     return 0;
 }
-weak_alias (__isinf, isinf)
+strong_alias(__isinf,isinf)
 
 #if 0
 int __isinfl ( long double x )
@@ -248,7 +256,7 @@ int __isinfl ( long double x )
     }
     return 0;
 }
-weak_alias (__isinfl, isinfl)
+strong_alias(__isinfl,isinfl)
 #endif
 
 /***********************************************************************
@@ -271,14 +279,16 @@ int __isnanf ( float x )
    z.fval = x;
    return (((z.lval&FEXP_MASK) == FEXP_MASK) && ((z.lval&FFRAC_MASK) != 0));
 }
-weak_alias (__isnanf, isnanf)
+strong_alias(__isnanf,isnanf)
 
+libm_hidden_proto(__isnan)
 int __isnan ( double x )
 {
 	int class = __fpclassify(x);
 	return ( class == FP_NAN );
 }
-weak_alias (__isnan, isnan)
+libm_hidden_def(__isnan)
+strong_alias(__isnan,isnan)
 
 #if 0
 int __isnanl ( long double x )
@@ -286,6 +296,6 @@ int __isnanl ( long double x )
 	int class = __fpclassify(x);
 	return ( class == FP_NAN );
 }
-weak_alias (__isnanl, isnanl)
+strong_alias(__isnanl,isnanl)
 #endif
 

+ 3 - 0
libm/k_rem_pio2.c

@@ -133,6 +133,9 @@ static char rcsid[] = "$NetBSD: k_rem_pio2.c,v 1.7 1995/05/10 20:46:25 jtc Exp $
 #include "math.h"
 #include "math_private.h"
 
+libm_hidden_proto(scalbn)
+libm_hidden_proto(floor)
+
 #ifdef __STDC__
 static const int init_jk[] = {2,3,4,6}; /* initial value for jk */
 #else

+ 4 - 0
libm/k_standard.c

@@ -18,6 +18,10 @@ static char rcsid[] = "$NetBSD: k_standard.c,v 1.6 1995/05/10 20:46:35 jtc Exp $
 #include "math_private.h"
 #include <errno.h>
 
+libm_hidden_proto(copysign)
+libm_hidden_proto(matherr)
+libm_hidden_proto(rint)
+
 #ifndef _USE_WRITE
 #include <stdio.h>			/* fputs(), stderr */
 #define	WRITE2(u,v)	fputs(u, stderr)

+ 3 - 0
libm/k_tan.c

@@ -50,6 +50,9 @@ static char rcsid[] = "$NetBSD: k_tan.c,v 1.8 1995/05/10 20:46:37 jtc Exp $";
 
 #include "math.h"
 #include "math_private.h"
+
+libm_hidden_proto(fabs)
+
 #ifdef __STDC__
 static const double
 #else

+ 2 - 1
libm/powerpc/s_ceil.c

@@ -48,6 +48,7 @@ typedef union
 *      Ceil(x) returns the smallest integer not less than x.                   *
 *******************************************************************************/
 
+libm_hidden_proto(ceil)
 double ceil ( double x )
 	{
 	DblInHex xInHex,OldEnvironment;
@@ -108,4 +109,4 @@ double ceil ( double x )
 *******************************************************************************/
 	return ( x );
 	}
-
+libm_hidden_def(ceil)

+ 2 - 0
libm/powerpc/s_copysign.c

@@ -34,6 +34,7 @@
 *     suggested in the IEEE standard 754.                                      *
 *******************************************************************************/
 
+libm_hidden_proto(copysign)
 double copysign ( double arg2, double arg1 )
       {
       union
@@ -54,3 +55,4 @@ double copysign ( double arg2, double arg1 )
 
       return y.dbl;
       }
+libm_hidden_def(copysign)

+ 2 - 1
libm/powerpc/s_floor.c

@@ -48,6 +48,7 @@ typedef union
 *      Floor(x) returns the largest integer not greater than x.                *
 *******************************************************************************/
 
+libm_hidden_proto(floor)
 double floor ( double x )
 	{
 	DblInHex xInHex,OldEnvironment;
@@ -108,4 +109,4 @@ double floor ( double x )
 *******************************************************************************/
 	return ( x );
 	}
-
+libm_hidden_def(floor)

+ 2 - 1
libm/powerpc/s_frexp.c

@@ -39,6 +39,7 @@ typedef union
       double dbl;
       } DblInHex;
 
+libm_hidden_proto(frexp)
 double frexp ( double value, int *eptr )
       {
       DblInHex argument;
@@ -61,4 +62,4 @@ double frexp ( double value, int *eptr )
 	argument.words.hi = ( argument.words.hi & 0x800fffff ) | 0x3fe00000;
 	return argument.dbl;
 	}
-
+libm_hidden_def(frexp)

+ 2 - 1
libm/powerpc/s_ldexp.c

@@ -37,6 +37,7 @@ typedef union
       double dbl;
       } DblInHex;
 
+libm_hidden_proto(ldexp)
 double ldexp ( double value, int exp )
       {
       if ( exp > SHRT_MAX )
@@ -45,4 +46,4 @@ double ldexp ( double value, int exp )
             exp = -SHRT_MAX;
       return scalb ( value, exp  );
       }
-
+libm_hidden_def(ldexp)

+ 2 - 1
libm/powerpc/s_logb.c

@@ -60,6 +60,7 @@ static const DblInHex minusInf  = {{ 0xFFF00000, 0x00000000 }};
 ********************************************************************************
 *******************************************************************************/
 
+libm_hidden_proto(logb)
 double logb (  double x  )
       {
       DblInHex xInHex;
@@ -102,4 +103,4 @@ double logb (  double x  )
             return ( xInHex.dbl - klTod );
             }
       }
-
+libm_hidden_def(logb)

+ 2 - 0
libm/powerpc/s_modf.c

@@ -280,6 +280,7 @@ long int roundtol ( double x )
 *     modf is the double implementation.                                       *
 *******************************************************************************/
 
+libm_hidden_proto(modf)
 double modf ( double x, double *iptr )
       {
       register double OldEnvironment, xtrunc;
@@ -340,3 +341,4 @@ double modf ( double x, double *iptr )
             return ( argument.dbl );
             }
       }
+libm_hidden_def(modf)

+ 2 - 0
libm/powerpc/s_nearbyint.c

@@ -15,6 +15,7 @@
 
 static const double twoTo52      = 4503599627370496.0;
 
+libm_hidden_proto(nearbyint)
 double nearbyint ( double x )
       {
 	double y;
@@ -34,3 +35,4 @@ double nearbyint ( double x )
 	asm ("mtfsf 255,%0" : /*NULLOUT*/ : /*IN*/ "f" ( OldEnvironment ));
       return ( y );
 	}
+libm_hidden_def(nearbyint)

+ 2 - 1
libm/powerpc/s_rint.c

@@ -70,6 +70,7 @@ static const double doubleToLong = 4503603922337792.0;	            // 2^52
 static const DblInHex Huge       = {{ 0x7FF00000, 0x00000000 }};
 static const DblInHex TOWARDZERO = {{ 0x00000000, 0x00000001 }};
 
+libm_hidden_proto(rint)
 /*******************************************************************************
 *                                                                              *
 *     The function rint rounds its double argument to integral value           *
@@ -155,4 +156,4 @@ double rint ( double x )
 *******************************************************************************/
       return ( x );
       }
-
+libm_hidden_def(rint)

+ 2 - 0
libm/powerpc/s_round.c

@@ -29,6 +29,7 @@ static const double twoTo52      = 4503599627370496.0;
 *                                                                              *
 *******************************************************************************/
 
+libm_hidden_proto(round)
 double round ( double x )
       {
       DblInHex argument, OldEnvironment;
@@ -111,3 +112,4 @@ double round ( double x )
 *******************************************************************************/
       return ( x );
       }
+libm_hidden_def(round)

+ 2 - 0
libm/powerpc/s_trunc.c

@@ -27,6 +27,7 @@ static const double twoTo52      = 4503599627370496.0;
 *                                                                              *
 *******************************************************************************/
 
+libm_hidden_proto(trunc)
 double trunc ( double x )
       {
 	DblInHex argument,OldEnvironment;
@@ -85,3 +86,4 @@ double trunc ( double x )
 *******************************************************************************/
 	return ( x );
 	}
+libm_hidden_def(trunc)

+ 2 - 0
libm/powerpc/w_scalb.c

@@ -50,6 +50,7 @@ static const double twoToM1022 = 2.225073858507201383e-308;  // 0x1p-1022
       Calls:  none.
 ***********************************************************************/
 
+libm_hidden_proto(scalb)
 double scalb ( double x, int n  )
       {
       DblInHex xInHex;
@@ -85,3 +86,4 @@ double scalb ( double x, int n  )
       xInHex.words.hi = ( ( unsigned long ) ( n + 1023 ) ) << 20;
       return ( x * xInHex.dbl );
       }
+libm_hidden_def(scalb)

+ 5 - 0
libm/s_asinh.c

@@ -28,6 +28,9 @@ static char rcsid[] = "$NetBSD: s_asinh.c,v 1.9 1995/05/12 04:57:37 jtc Exp $";
 #include "math.h"
 #include "math_private.h"
 
+libm_hidden_proto(log1p)
+libm_hidden_proto(fabs)
+
 #ifdef __STDC__
 static const double
 #else
@@ -37,6 +40,7 @@ one =  1.00000000000000000000e+00, /* 0x3FF00000, 0x00000000 */
 ln2 =  6.93147180559945286227e-01, /* 0x3FE62E42, 0xFEFA39EF */
 huge=  1.00000000000000000000e+300;
 
+libm_hidden_proto(asinh)
 #ifdef __STDC__
 	double asinh(double x)
 #else
@@ -63,3 +67,4 @@ huge=  1.00000000000000000000e+300;
 	}
 	if(hx>0) return w; else return -w;
 }
+libm_hidden_def(asinh)

+ 4 - 0
libm/s_atan.c

@@ -37,6 +37,8 @@ static char rcsid[] = "$NetBSD: s_atan.c,v 1.8 1995/05/10 20:46:45 jtc Exp $";
 #include "math.h"
 #include "math_private.h"
 
+libm_hidden_proto(fabs)
+
 #ifdef __STDC__
 static const double atanhi[] = {
 #else
@@ -77,6 +79,7 @@ static double aT[] = {
   1.62858201153657823623e-02, /* 0x3F90AD3A, 0xE322DA11 */
 };
 
+libm_hidden_proto(atan)
 #ifdef __STDC__
 	static const double
 #else
@@ -137,3 +140,4 @@ huge   = 1.0e300;
 	    return (hx<0)? -z:z;
 	}
 }
+libm_hidden_def(atan)

+ 2 - 0
libm/s_cbrt.c

@@ -39,6 +39,7 @@ E =  1.41428571428571436819e+00, /* 99/70     = 0x3FF6A0EA, 0x0EA0EA0F */
 F =  1.60714285714285720630e+00, /* 45/28     = 0x3FF9B6DB, 0x6DB6DB6E */
 G =  3.57142857142857150787e-01; /* 5/14      = 0x3FD6DB6D, 0xB6DB6DB7 */
 
+libm_hidden_proto(cbrt)
 #ifdef __STDC__
 	double cbrt(double x)
 #else
@@ -91,3 +92,4 @@ G =  3.57142857142857150787e-01; /* 5/14      = 0x3FD6DB6D, 0xB6DB6DB7 */
 	SET_HIGH_WORD(t,high|sign);
 	return(t);
 }
+libm_hidden_def(cbrt)

+ 2 - 1
libm/s_ceil.c

@@ -32,6 +32,7 @@ static const double huge = 1.0e300;
 static double huge = 1.0e300;
 #endif
 
+libm_hidden_proto(ceil)
 #ifdef __STDC__
 	double ceil(double x)
 #else
@@ -78,4 +79,4 @@ static double huge = 1.0e300;
 	INSERT_WORDS(x,i0,i1);
 	return x;
 }
-
+libm_hidden_def(ceil)

+ 2 - 1
libm/s_copysign.c

@@ -23,6 +23,7 @@ static char rcsid[] = "$NetBSD: s_copysign.c,v 1.8 1995/05/10 20:46:57 jtc Exp $
 #include "math.h"
 #include "math_private.h"
 
+libm_hidden_proto(copysign)
 #ifdef __STDC__
 	double copysign(double x, double y)
 #else
@@ -36,4 +37,4 @@ static char rcsid[] = "$NetBSD: s_copysign.c,v 1.8 1995/05/10 20:46:57 jtc Exp $
 	SET_HIGH_WORD(x,(hx&0x7fffffff)|(hy&0x80000000));
         return x;
 }
-
+libm_hidden_def(copysign)

+ 2 - 0
libm/s_cos.c

@@ -48,6 +48,7 @@ static char rcsid[] = "$NetBSD: s_cos.c,v 1.7 1995/05/10 20:47:02 jtc Exp $";
 #include "math.h"
 #include "math_private.h"
 
+libm_hidden_proto(cos)
 #ifdef __STDC__
 	double cos(double x)
 #else
@@ -80,3 +81,4 @@ static char rcsid[] = "$NetBSD: s_cos.c,v 1.7 1995/05/10 20:47:02 jtc Exp $";
 	    }
 	}
 }
+libm_hidden_def(cos)

+ 6 - 0
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)

+ 2 - 0
libm/s_expm1.c

@@ -131,6 +131,7 @@ Q3  =  -7.93650757867487942473e-05, /* BF14CE19 9EAADBB7 */
 Q4  =   4.00821782732936239552e-06, /* 3ED0CFCA 86E65239 */
 Q5  =  -2.01099218183624371326e-07; /* BE8AFDB7 6E09C32D */
 
+libm_hidden_proto(expm1)
 #ifdef __STDC__
 	double expm1(double x)
 #else
@@ -227,3 +228,4 @@ Q5  =  -2.01099218183624371326e-07; /* BE8AFDB7 6E09C32D */
 	}
 	return y;
 }
+libm_hidden_def(expm1)

+ 2 - 0
libm/s_fabs.c

@@ -21,6 +21,7 @@ static char rcsid[] = "$NetBSD: s_fabs.c,v 1.7 1995/05/10 20:47:13 jtc Exp $";
 #include "math.h"
 #include "math_private.h"
 
+libm_hidden_proto(fabs)
 #ifdef __STDC__
 	double fabs(double x)
 #else
@@ -33,3 +34,4 @@ static char rcsid[] = "$NetBSD: s_fabs.c,v 1.7 1995/05/10 20:47:13 jtc Exp $";
 	SET_HIGH_WORD(x,high&0x7fffffff);
         return x;
 }
+libm_hidden_def(fabs)

+ 3 - 1
libm/s_finite.c

@@ -33,4 +33,6 @@ static char rcsid[] = "$NetBSD: s_finite.c,v 1.8 1995/05/10 20:47:17 jtc Exp $";
 	GET_HIGH_WORD(hx,x);
 	return (int)((u_int32_t)((hx&0x7fffffff)-0x7ff00000)>>31);
 }
-weak_alias(__finite,finite)
+libm_hidden_proto(finite)
+strong_alias(__finite,finite)
+libm_hidden_def(finite)

+ 2 - 0
libm/s_floor.c

@@ -32,6 +32,7 @@ static const double huge = 1.0e300;
 static double huge = 1.0e300;
 #endif
 
+libm_hidden_proto(floor)
 #ifdef __STDC__
 	double floor(double x)
 #else
@@ -79,3 +80,4 @@ static double huge = 1.0e300;
 	INSERT_WORDS(x,i0,i1);
 	return x;
 }
+libm_hidden_def(floor)

+ 2 - 0
libm/s_frexp.c

@@ -34,6 +34,7 @@ static double
 #endif
 two54 =  1.80143985094819840000e+16; /* 0x43500000, 0x00000000 */
 
+libm_hidden_proto(frexp)
 #ifdef __STDC__
 	double frexp(double x, int *eptr)
 #else
@@ -57,3 +58,4 @@ two54 =  1.80143985094819840000e+16; /* 0x43500000, 0x00000000 */
 	SET_HIGH_WORD(x,hx);
 	return x;
 }
+libm_hidden_def(frexp)

+ 2 - 0
libm/s_ilogb.c

@@ -23,6 +23,7 @@ static char rcsid[] = "$NetBSD: s_ilogb.c,v 1.9 1995/05/10 20:47:28 jtc Exp $";
 #include "math.h"
 #include "math_private.h"
 
+libm_hidden_proto(ilogb)
 #ifdef __STDC__
 	int ilogb(double x)
 #else
@@ -49,3 +50,4 @@ static char rcsid[] = "$NetBSD: s_ilogb.c,v 1.9 1995/05/10 20:47:28 jtc Exp $";
 	else if (hx<0x7ff00000) return (hx>>20)-1023;
 	else return 0x7fffffff;
 }
+libm_hidden_def(ilogb)

+ 5 - 0
libm/s_ldexp.c

@@ -18,6 +18,10 @@ static char rcsid[] = "$NetBSD: s_ldexp.c,v 1.6 1995/05/10 20:47:40 jtc Exp $";
 #include "math_private.h"
 #include <errno.h>
 
+libm_hidden_proto(scalbn)
+libm_hidden_proto(finite)
+
+libm_hidden_proto(ldexp)
 #ifdef __STDC__
 	double ldexp(double value, int exp)
 #else
@@ -30,3 +34,4 @@ static char rcsid[] = "$NetBSD: s_ldexp.c,v 1.6 1995/05/10 20:47:40 jtc Exp $";
 	if(!finite(value)||value==0.0) errno = ERANGE;
 	return value;
 }
+libm_hidden_def(ldexp)

+ 2 - 1
libm/s_llround.c

@@ -22,7 +22,7 @@
 
 #include "math_private.h"
 
-
+libm_hidden_proto(llround)
 long long int
 llround (double x)
 {
@@ -73,3 +73,4 @@ llround (double x)
 
   return sign * result;
 }
+libm_hidden_def(llround)

+ 2 - 0
libm/s_log1p.c

@@ -104,6 +104,7 @@ static const double zero = 0.0;
 static double zero = 0.0;
 #endif
 
+libm_hidden_proto(log1p)
 #ifdef __STDC__
 	double log1p(double x)
 #else
@@ -172,3 +173,4 @@ static double zero = 0.0;
 	if(k==0) return f-(hfsq-s*(hfsq+R)); else
 		 return k*ln2_hi-((hfsq-(s*(hfsq+R)+(k*ln2_lo+c)))-f);
 }
+libm_hidden_def(log1p)

+ 4 - 0
libm/s_logb.c

@@ -23,6 +23,9 @@ static char rcsid[] = "$NetBSD: s_logb.c,v 1.8 1995/05/10 20:47:50 jtc Exp $";
 #include "math.h"
 #include "math_private.h"
 
+libm_hidden_proto(fabs)
+
+libm_hidden_proto(logb)
 #ifdef __STDC__
 	double logb(double x)
 #else
@@ -40,3 +43,4 @@ static char rcsid[] = "$NetBSD: s_logb.c,v 1.8 1995/05/10 20:47:50 jtc Exp $";
 	else
 		return (double) (ix-1023);
 }
+libm_hidden_def(logb)

+ 2 - 1
libm/s_lround.c

@@ -22,7 +22,7 @@
 
 #include "math_private.h"
 
-
+libm_hidden_proto(lround)
 long int
 lround (double x)
 {
@@ -73,3 +73,4 @@ lround (double x)
 
   return sign * result;
 }
+libm_hidden_def(lround)

+ 2 - 0
libm/s_matherr.c

@@ -17,6 +17,7 @@ static char rcsid[] = "$NetBSD: s_matherr.c,v 1.6 1995/05/10 20:47:53 jtc Exp $"
 #include "math.h"
 #include "math_private.h"
 
+libm_hidden_proto(matherr)
 #ifdef __STDC__
 	int matherr(struct exception *x)
 #else
@@ -28,3 +29,4 @@ static char rcsid[] = "$NetBSD: s_matherr.c,v 1.6 1995/05/10 20:47:53 jtc Exp $"
 	if(x->arg1!=x->arg1) return 0;
 	return n;
 }
+libm_hidden_def(matherr)

+ 2 - 0
libm/s_modf.c

@@ -33,6 +33,7 @@ static const double one = 1.0;
 static double one = 1.0;
 #endif
 
+libm_hidden_proto(modf)
 #ifdef __STDC__
 	double modf(double x, double *iptr)
 #else
@@ -81,3 +82,4 @@ static double one = 1.0;
 	    }
 	}
 }
+libm_hidden_def(modf)

+ 2 - 0
libm/s_nextafter.c

@@ -24,6 +24,7 @@ static char rcsid[] = "$NetBSD: s_nextafter.c,v 1.8 1995/05/10 20:47:58 jtc Exp
 #include "math.h"
 #include "math_private.h"
 
+libm_hidden_proto(nextafter)
 #ifdef __STDC__
 	double nextafter(double x, double y)
 #else
@@ -77,3 +78,4 @@ static char rcsid[] = "$NetBSD: s_nextafter.c,v 1.8 1995/05/10 20:47:58 jtc Exp
 	INSERT_WORDS(x,hx,lx);
 	return x;
 }
+libm_hidden_def(nextafter)

+ 2 - 0
libm/s_rint.c

@@ -37,6 +37,7 @@ TWO52[2]={
  -4.50359962737049600000e+15, /* 0xC3300000, 0x00000000 */
 };
 
+libm_hidden_proto(rint)
 #ifdef __STDC__
 	double rint(double x)
 #else
@@ -84,3 +85,4 @@ TWO52[2]={
 	w = TWO52[sx]+x;
 	return w-TWO52[sx];
 }
+libm_hidden_def(rint)

+ 2 - 1
libm/s_round.c

@@ -25,7 +25,7 @@
 
 static const double huge = 1.0e300;
 
-
+libm_hidden_proto(round)
 double
 round (double x)
 {
@@ -90,3 +90,4 @@ round (double x)
   INSERT_WORDS (x, i0, i1);
   return x;
 }
+libm_hidden_def(round)

+ 4 - 0
libm/s_scalbn.c

@@ -24,6 +24,8 @@ static char rcsid[] = "$NetBSD: s_scalbn.c,v 1.8 1995/05/10 20:48:08 jtc Exp $";
 #include "math.h"
 #include "math_private.h"
 
+libm_hidden_proto(copysign)
+
 #ifdef __STDC__
 static const double
 #else
@@ -34,6 +36,7 @@ twom54  =  5.55111512312578270212e-17, /* 0x3C900000, 0x00000000 */
 huge   = 1.0e+300,
 tiny   = 1.0e-300;
 
+libm_hidden_proto(scalbn)
 #ifdef __STDC__
 	double scalbn (double x, int n)
 #else
@@ -65,3 +68,4 @@ tiny   = 1.0e-300;
 	SET_HIGH_WORD(x,(hx&0x800fffff)|(k<<20));
         return x*twom54;
 }
+libm_hidden_def(scalbn)

+ 2 - 0
libm/s_signgam.c

@@ -1,3 +1,5 @@
 #include "math.h"
 #include "math_private.h"
+libm_hidden_proto(signgam)
 int signgam = 0;
+libm_hidden_def(signgam)

+ 2 - 0
libm/s_significand.c

@@ -23,6 +23,8 @@ static char rcsid[] = "$NetBSD: s_significand.c,v 1.6 1995/05/10 20:48:11 jtc Ex
 #include "math.h"
 #include "math_private.h"
 
+libm_hidden_proto(ilogb)
+
 #ifdef __STDC__
 	double significand(double x)
 #else

+ 2 - 0
libm/s_sin.c

@@ -48,6 +48,7 @@ static char rcsid[] = "$NetBSD: s_sin.c,v 1.7 1995/05/10 20:48:15 jtc Exp $";
 #include "math.h"
 #include "math_private.h"
 
+libm_hidden_proto(sin)
 #ifdef __STDC__
 	double sin(double x)
 #else
@@ -80,3 +81,4 @@ static char rcsid[] = "$NetBSD: s_sin.c,v 1.7 1995/05/10 20:48:15 jtc Exp $";
 	    }
 	}
 }
+libm_hidden_def(sin)

+ 2 - 0
libm/s_tan.c

@@ -47,6 +47,7 @@ static char rcsid[] = "$NetBSD: s_tan.c,v 1.7 1995/05/10 20:48:18 jtc Exp $";
 #include "math.h"
 #include "math_private.h"
 
+libm_hidden_proto(tan)
 #ifdef __STDC__
 	double tan(double x)
 #else
@@ -74,3 +75,4 @@ static char rcsid[] = "$NetBSD: s_tan.c,v 1.7 1995/05/10 20:48:18 jtc Exp $";
 							-1 -- n odd */
 	}
 }
+libm_hidden_def(tan)

+ 5 - 0
libm/s_tanh.c

@@ -41,12 +41,16 @@ static char rcsid[] = "$NetBSD: s_tanh.c,v 1.7 1995/05/10 20:48:22 jtc Exp $";
 #include "math.h"
 #include "math_private.h"
 
+libm_hidden_proto(expm1)
+libm_hidden_proto(fabs)
+
 #ifdef __STDC__
 static const double one=1.0, two=2.0, tiny = 1.0e-300;
 #else
 static double one=1.0, two=2.0, tiny = 1.0e-300;
 #endif
 
+libm_hidden_proto(tanh)
 #ifdef __STDC__
 	double tanh(double x)
 #else
@@ -84,3 +88,4 @@ static double one=1.0, two=2.0, tiny = 1.0e-300;
 	}
 	return (jx>=0)? z: -z;
 }
+libm_hidden_def(tanh)

+ 2 - 1
libm/w_acos.c

@@ -21,7 +21,7 @@ static char rcsid[] = "$NetBSD: w_acos.c,v 1.6 1995/05/10 20:48:26 jtc Exp $";
 #include "math.h"
 #include "math_private.h"
 
-
+libm_hidden_proto(acos)
 #ifdef __STDC__
 	double acos(double x)		/* wrapper acos */
 #else
@@ -41,3 +41,4 @@ static char rcsid[] = "$NetBSD: w_acos.c,v 1.6 1995/05/10 20:48:26 jtc Exp $";
 	    return z;
 #endif
 }
+libm_hidden_def(acos)

+ 2 - 0
libm/w_acosh.c

@@ -21,6 +21,7 @@ static char rcsid[] = "$NetBSD: w_acosh.c,v 1.6 1995/05/10 20:48:31 jtc Exp $";
 #include "math.h"
 #include "math_private.h"
 
+libm_hidden_proto(acosh)
 #ifdef __STDC__
 	double acosh(double x)		/* wrapper acosh */
 #else
@@ -40,3 +41,4 @@ static char rcsid[] = "$NetBSD: w_acosh.c,v 1.6 1995/05/10 20:48:31 jtc Exp $";
 	    return z;
 #endif
 }
+libm_hidden_def(acosh)

+ 2 - 0
libm/w_asin.c

@@ -23,6 +23,7 @@ static char rcsid[] = "$NetBSD: w_asin.c,v 1.6 1995/05/10 20:48:35 jtc Exp $";
 #include "math_private.h"
 
 
+libm_hidden_proto(asin)
 #ifdef __STDC__
 	double asin(double x)		/* wrapper asin */
 #else
@@ -42,3 +43,4 @@ static char rcsid[] = "$NetBSD: w_asin.c,v 1.6 1995/05/10 20:48:35 jtc Exp $";
 	    return z;
 #endif
 }
+libm_hidden_def(asin)

+ 2 - 1
libm/w_atan2.c

@@ -20,7 +20,7 @@ static char rcsid[] = "$NetBSD: w_atan2.c,v 1.6 1995/05/10 20:48:39 jtc Exp $";
 #include "math.h"
 #include "math_private.h"
 
-
+libm_hidden_proto(atan2)
 #ifdef __STDC__
 	double atan2(double y, double x)	/* wrapper atan2 */
 #else
@@ -40,3 +40,4 @@ static char rcsid[] = "$NetBSD: w_atan2.c,v 1.6 1995/05/10 20:48:39 jtc Exp $";
 	    return z;
 #endif
 }
+libm_hidden_def(atan2)

+ 2 - 1
libm/w_atanh.c

@@ -21,7 +21,7 @@ static char rcsid[] = "$NetBSD: w_atanh.c,v 1.6 1995/05/10 20:48:43 jtc Exp $";
 #include "math.h"
 #include "math_private.h"
 
-
+libm_hidden_proto(atanh)
 #ifdef __STDC__
 	double atanh(double x)		/* wrapper atanh */
 #else
@@ -45,3 +45,4 @@ static char rcsid[] = "$NetBSD: w_atanh.c,v 1.6 1995/05/10 20:48:43 jtc Exp $";
 	    return z;
 #endif
 }
+libm_hidden_def(atanh)

+ 2 - 0
libm/w_cabs.c

@@ -8,6 +8,8 @@
 #include <complex.h>
 #include <math.h>
 
+libm_hidden_proto(hypot)
+
 double cabs(double _Complex z)
 {
 	return hypot(__real__ z, __imag__ z);

+ 2 - 0
libm/w_cosh.c

@@ -21,6 +21,7 @@ static char rcsid[] = "$NetBSD: w_cosh.c,v 1.6 1995/05/10 20:48:47 jtc Exp $";
 #include "math.h"
 #include "math_private.h"
 
+libm_hidden_proto(cosh)
 #ifdef __STDC__
 	double cosh(double x)		/* wrapper cosh */
 #else
@@ -40,3 +41,4 @@ static char rcsid[] = "$NetBSD: w_cosh.c,v 1.6 1995/05/10 20:48:47 jtc Exp $";
 	    return z;
 #endif
 }
+libm_hidden_def(cosh)

+ 2 - 0
libm/w_drem.c

@@ -7,6 +7,8 @@
 
 #include <math.h>
 
+libm_hidden_proto(remainder)
+
 double
 drem(x, y)
 	double x, y;

+ 2 - 0
libm/w_exp.c

@@ -29,6 +29,7 @@ static double
 o_threshold=  7.09782712893383973096e+02,  /* 0x40862E42, 0xFEFA39EF */
 u_threshold= -7.45133219101941108420e+02;  /* 0xc0874910, 0xD52D3051 */
 
+libm_hidden_proto(exp)
 #ifdef __STDC__
 	double exp(double x)		/* wrapper exp */
 #else
@@ -51,3 +52,4 @@ u_threshold= -7.45133219101941108420e+02;  /* 0xc0874910, 0xD52D3051 */
 	return z;
 #endif
 }
+libm_hidden_def(exp)

+ 2 - 1
libm/w_fmod.c

@@ -21,7 +21,7 @@ static char rcsid[] = "$NetBSD: w_fmod.c,v 1.6 1995/05/10 20:48:55 jtc Exp $";
 #include "math.h"
 #include "math_private.h"
 
-
+libm_hidden_proto(fmod)
 #ifdef __STDC__
 	double fmod(double x, double y)	/* wrapper fmod */
 #else
@@ -41,3 +41,4 @@ static char rcsid[] = "$NetBSD: w_fmod.c,v 1.6 1995/05/10 20:48:55 jtc Exp $";
 	    return z;
 #endif
 }
+libm_hidden_def(fmod)

+ 1 - 0
libm/w_gamma.c

@@ -24,6 +24,7 @@ static char rcsid[] = "$NetBSD: w_gamma.c,v 1.7 1995/11/20 22:06:43 jtc Exp $";
 #include "math_private.h"
 
 extern int signgam;
+libm_hidden_proto(signgam)
 
 #ifdef __STDC__
 	double gamma(double x)

+ 2 - 1
libm/w_hypot.c

@@ -21,7 +21,7 @@ static char rcsid[] = "$NetBSD: w_hypot.c,v 1.6 1995/05/10 20:49:07 jtc Exp $";
 #include "math.h"
 #include "math_private.h"
 
-
+libm_hidden_proto(hypot)
 #ifdef __STDC__
 	double hypot(double x, double y)/* wrapper hypot */
 #else
@@ -41,3 +41,4 @@ static char rcsid[] = "$NetBSD: w_hypot.c,v 1.6 1995/05/10 20:49:07 jtc Exp $";
 	    return z;
 #endif
 }
+libm_hidden_def(hypot)

+ 3 - 0
libm/w_lgamma.c

@@ -24,7 +24,9 @@ static char rcsid[] = "$NetBSD: w_lgamma.c,v 1.6 1995/05/10 20:49:24 jtc Exp $";
 #include "math_private.h"
 
 extern int signgam;
+libm_hidden_proto(signgam)
 
+libm_hidden_proto(lgamma)
 #ifdef __STDC__
 	double lgamma(double x)
 #else
@@ -47,3 +49,4 @@ extern int signgam;
             return y;
 #endif
 }
+libm_hidden_def(lgamma)

+ 2 - 1
libm/w_log.c

@@ -21,7 +21,7 @@ static char rcsid[] = "$NetBSD: w_log.c,v 1.6 1995/05/10 20:49:33 jtc Exp $";
 #include "math.h"
 #include "math_private.h"
 
-
+libm_hidden_proto(log)
 #ifdef __STDC__
 	double log(double x)		/* wrapper log */
 #else
@@ -41,3 +41,4 @@ static char rcsid[] = "$NetBSD: w_log.c,v 1.6 1995/05/10 20:49:33 jtc Exp $";
 	    return __kernel_standard(x,x,17); /* log(x<0) */
 #endif
 }
+libm_hidden_def(log)

+ 2 - 1
libm/w_log10.c

@@ -21,7 +21,7 @@ static char rcsid[] = "$NetBSD: w_log10.c,v 1.6 1995/05/10 20:49:35 jtc Exp $";
 #include "math.h"
 #include "math_private.h"
 
-
+libm_hidden_proto(log10)
 #ifdef __STDC__
 	double log10(double x)		/* wrapper log10 */
 #else
@@ -44,3 +44,4 @@ static char rcsid[] = "$NetBSD: w_log10.c,v 1.6 1995/05/10 20:49:35 jtc Exp $";
 	    return z;
 #endif
 }
+libm_hidden_def(log10)

+ 2 - 1
libm/w_pow.c

@@ -19,7 +19,7 @@
 #include "math.h"
 #include "math_private.h"
 
-
+libm_hidden_proto(pow)
 #ifdef __STDC__
 	double pow(double x, double y)	/* wrapper pow */
 #else
@@ -59,3 +59,4 @@
 	return z;
 #endif
 }
+libm_hidden_def(pow)

+ 2 - 0
libm/w_remainder.c

@@ -21,6 +21,7 @@ static char rcsid[] = "$NetBSD: w_remainder.c,v 1.6 1995/05/10 20:49:44 jtc Exp
 #include "math.h"
 #include "math_private.h"
 
+libm_hidden_proto(remainder)
 #ifdef __STDC__
 	double remainder(double x, double y)	/* wrapper remainder */
 #else
@@ -40,3 +41,4 @@ static char rcsid[] = "$NetBSD: w_remainder.c,v 1.6 1995/05/10 20:49:44 jtc Exp
 	    return z;
 #endif
 }
+libm_hidden_def(remainder)

+ 2 - 0
libm/w_sinh.c

@@ -21,6 +21,7 @@ static char rcsid[] = "$NetBSD: w_sinh.c,v 1.6 1995/05/10 20:49:51 jtc Exp $";
 #include "math.h"
 #include "math_private.h"
 
+libm_hidden_proto(sinh)
 #ifdef __STDC__
 	double sinh(double x)		/* wrapper sinh */
 #else
@@ -40,3 +41,4 @@ static char rcsid[] = "$NetBSD: w_sinh.c,v 1.6 1995/05/10 20:49:51 jtc Exp $";
 	    return z;
 #endif
 }
+libm_hidden_def(sinh)

+ 2 - 0
libm/w_sqrt.c

@@ -21,6 +21,7 @@ static char rcsid[] = "$NetBSD: w_sqrt.c,v 1.6 1995/05/10 20:49:55 jtc Exp $";
 #include "math.h"
 #include "math_private.h"
 
+libm_hidden_proto(sqrt)
 #ifdef __STDC__
 	double sqrt(double x)		/* wrapper sqrt */
 #else
@@ -40,3 +41,4 @@ static char rcsid[] = "$NetBSD: w_sqrt.c,v 1.6 1995/05/10 20:49:55 jtc Exp $";
 	    return z;
 #endif
 }
+libm_hidden_def(sqrt)