diff --git a/Modules/mathmodule.c b/Modules/mathmodule.c index 5b486fd174b..ae7dc7fad70 100644 --- a/Modules/mathmodule.c +++ b/Modules/mathmodule.c @@ -28,24 +28,27 @@ OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. #include -#include "modsupport.h" - #define getdoublearg(v, a) getargs(v, "d", a) #define get2doublearg(v, a, b) getargs(v, "(dd)", a, b) #include +#ifndef __STDC__ +extern double fmod PROTO((double, double)); +extern double frexp PROTO((double, int *)); +extern double ldexp PROTO((double, int)); +extern double modf PROTO((double, double *)); +#endif + +#ifdef HAVE_HYPOT +extern double hypot PROTO((double, double)); +#endif + #ifdef i860 /* Cray APP has bogus definition of HUGE_VAL in */ #undef HUGE_VAL #endif -#ifndef macintosh -#ifndef __STDC__ -extern double fmod PROTO((double, double)); -#endif -#endif - #ifdef HUGE_VAL #define CHECK(x) if (errno != 0) ; \ else if (-HUGE_VAL <= (x) && (x) <= HUGE_VAL) ; \ @@ -139,9 +142,6 @@ FUNC1(math_tanh, tanh) #ifndef macintosh -double frexp PROTO((double, int *)); -double ldexp PROTO((double, int)); -double modf PROTO((double, double *)); #endif