cpython-lru_cache-weakref: Modules/mathmodule.c annotate

annotate Modules/mathmodule.c @ 6719:faebc1940432 legacy-trunk

Understand -Xlinker option.

author	Guido van Rossum <guido@python.org>
date	Tue, 02 Dec 1997 20:38:11 +0000
parents	b5e648fde099
children	38023a425e48

rev	line source
145 853b736a6a9e Added copyright notice. Guido van Rossum <guido@python.org> parents: 92 diff changeset	1 /***********************************************************
2061 172ba04a5191 Added 1995 to copyright message. Guido van Rossum <guido@python.org> parents: 2055 diff changeset	2 Copyright 1991-1995 by Stichting Mathematisch Centrum, Amsterdam,
172ba04a5191 Added 1995 to copyright message. Guido van Rossum <guido@python.org> parents: 2055 diff changeset	3 The Netherlands.
145 853b736a6a9e Added copyright notice. Guido van Rossum <guido@python.org> parents: 92 diff changeset	4
853b736a6a9e Added copyright notice. Guido van Rossum <guido@python.org> parents: 92 diff changeset	5 All Rights Reserved
853b736a6a9e Added copyright notice. Guido van Rossum <guido@python.org> parents: 92 diff changeset	6
4503 65d2d8e67da3 New permission notice, includes CNRI. Guido van Rossum <guido@python.org> parents: 4178 diff changeset	7 Permission to use, copy, modify, and distribute this software and its
65d2d8e67da3 New permission notice, includes CNRI. Guido van Rossum <guido@python.org> parents: 4178 diff changeset	8 documentation for any purpose and without fee is hereby granted,
145 853b736a6a9e Added copyright notice. Guido van Rossum <guido@python.org> parents: 92 diff changeset	9 provided that the above copyright notice appear in all copies and that
4503 65d2d8e67da3 New permission notice, includes CNRI. Guido van Rossum <guido@python.org> parents: 4178 diff changeset	10 both that copyright notice and this permission notice appear in
145 853b736a6a9e Added copyright notice. Guido van Rossum <guido@python.org> parents: 92 diff changeset	11 supporting documentation, and that the names of Stichting Mathematisch
4503 65d2d8e67da3 New permission notice, includes CNRI. Guido van Rossum <guido@python.org> parents: 4178 diff changeset	12 Centrum or CWI or Corporation for National Research Initiatives or
65d2d8e67da3 New permission notice, includes CNRI. Guido van Rossum <guido@python.org> parents: 4178 diff changeset	13 CNRI not be used in advertising or publicity pertaining to
65d2d8e67da3 New permission notice, includes CNRI. Guido van Rossum <guido@python.org> parents: 4178 diff changeset	14 distribution of the software without specific, written prior
65d2d8e67da3 New permission notice, includes CNRI. Guido van Rossum <guido@python.org> parents: 4178 diff changeset	15 permission.
145 853b736a6a9e Added copyright notice. Guido van Rossum <guido@python.org> parents: 92 diff changeset	16
4503 65d2d8e67da3 New permission notice, includes CNRI. Guido van Rossum <guido@python.org> parents: 4178 diff changeset	17 While CWI is the initial source for this software, a modified version
65d2d8e67da3 New permission notice, includes CNRI. Guido van Rossum <guido@python.org> parents: 4178 diff changeset	18 is made available by the Corporation for National Research Initiatives
65d2d8e67da3 New permission notice, includes CNRI. Guido van Rossum <guido@python.org> parents: 4178 diff changeset	19 (CNRI) at the Internet address ftp://ftp.python.org.
65d2d8e67da3 New permission notice, includes CNRI. Guido van Rossum <guido@python.org> parents: 4178 diff changeset	20
65d2d8e67da3 New permission notice, includes CNRI. Guido van Rossum <guido@python.org> parents: 4178 diff changeset	21 STICHTING MATHEMATISCH CENTRUM AND CNRI DISCLAIM ALL WARRANTIES WITH
65d2d8e67da3 New permission notice, includes CNRI. Guido van Rossum <guido@python.org> parents: 4178 diff changeset	22 REGARD TO THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF
65d2d8e67da3 New permission notice, includes CNRI. Guido van Rossum <guido@python.org> parents: 4178 diff changeset	23 MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL STICHTING MATHEMATISCH
65d2d8e67da3 New permission notice, includes CNRI. Guido van Rossum <guido@python.org> parents: 4178 diff changeset	24 CENTRUM OR CNRI BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL
65d2d8e67da3 New permission notice, includes CNRI. Guido van Rossum <guido@python.org> parents: 4178 diff changeset	25 DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR
65d2d8e67da3 New permission notice, includes CNRI. Guido van Rossum <guido@python.org> parents: 4178 diff changeset	26 PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
65d2d8e67da3 New permission notice, includes CNRI. Guido van Rossum <guido@python.org> parents: 4178 diff changeset	27 TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
65d2d8e67da3 New permission notice, includes CNRI. Guido van Rossum <guido@python.org> parents: 4178 diff changeset	28 PERFORMANCE OF THIS SOFTWARE.
145 853b736a6a9e Added copyright notice. Guido van Rossum <guido@python.org> parents: 92 diff changeset	29
853b736a6a9e Added copyright notice. Guido van Rossum <guido@python.org> parents: 92 diff changeset	30 ******************************************************************/
853b736a6a9e Added copyright notice. Guido van Rossum <guido@python.org> parents: 92 diff changeset	31
6 fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	32 /* Math module -- standard C math library functions, pi and e */
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	33
4635 49745ddb4f69 Renamed Barry Warsaw <barry@python.org> parents: 4503 diff changeset	34 #include "Python.h"
6 fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	35
2455 b42ab77f2226 include mymath.h Guido van Rossum <guido@python.org> parents: 2213 diff changeset	36 #include "mymath.h"
86 a6934380c6e7 "Compiling" version Guido van Rossum <guido@python.org> parents: 75 diff changeset	37
3597 e07597389d64 Microsoft C changes Guido van Rossum <guido@python.org> parents: 3339 diff changeset	38 #ifndef _MSC_VER
2125 bd061dc30842 rearrange declarations somewhat Guido van Rossum <guido@python.org> parents: 2061 diff changeset	39 #ifndef __STDC__
4635 49745ddb4f69 Renamed Barry Warsaw <barry@python.org> parents: 4503 diff changeset	40 extern double fmod Py_PROTO((double, double));
49745ddb4f69 Renamed Barry Warsaw <barry@python.org> parents: 4503 diff changeset	41 extern double frexp Py_PROTO((double, int *));
49745ddb4f69 Renamed Barry Warsaw <barry@python.org> parents: 4503 diff changeset	42 extern double ldexp Py_PROTO((double, int));
49745ddb4f69 Renamed Barry Warsaw <barry@python.org> parents: 4503 diff changeset	43 extern double modf Py_PROTO((double, double *));
3597 e07597389d64 Microsoft C changes Guido van Rossum <guido@python.org> parents: 3339 diff changeset	44 #endif /* __STDC__ */
e07597389d64 Microsoft C changes Guido van Rossum <guido@python.org> parents: 3339 diff changeset	45 #endif /* _MSC_VER */
e07597389d64 Microsoft C changes Guido van Rossum <guido@python.org> parents: 3339 diff changeset	46
2125 bd061dc30842 rearrange declarations somewhat Guido van Rossum <guido@python.org> parents: 2061 diff changeset	47
1271 2919b448e385 * Microscopic corrections to make things compile on the Cray APP. Guido van Rossum <guido@python.org> parents: 1252 diff changeset	48 #ifdef i860
2919b448e385 * Microscopic corrections to make things compile on the Cray APP. Guido van Rossum <guido@python.org> parents: 1252 diff changeset	49 /* Cray APP has bogus definition of HUGE_VAL in <math.h> */
2919b448e385 * Microscopic corrections to make things compile on the Cray APP. Guido van Rossum <guido@python.org> parents: 1252 diff changeset	50 #undef HUGE_VAL
2919b448e385 * Microscopic corrections to make things compile on the Cray APP. Guido van Rossum <guido@python.org> parents: 1252 diff changeset	51 #endif
2919b448e385 * Microscopic corrections to make things compile on the Cray APP. Guido van Rossum <guido@python.org> parents: 1252 diff changeset	52
498 56bb1067a880 Improve error handling. Guido van Rossum <guido@python.org> parents: 438 diff changeset	53 #ifdef HUGE_VAL
56bb1067a880 Improve error handling. Guido van Rossum <guido@python.org> parents: 438 diff changeset	54 #define CHECK(x) if (errno != 0) ; \
56bb1067a880 Improve error handling. Guido van Rossum <guido@python.org> parents: 438 diff changeset	55 else if (-HUGE_VAL <= (x) && (x) <= HUGE_VAL) ; \
56bb1067a880 Improve error handling. Guido van Rossum <guido@python.org> parents: 438 diff changeset	56 else errno = ERANGE
56bb1067a880 Improve error handling. Guido van Rossum <guido@python.org> parents: 438 diff changeset	57 #else
56bb1067a880 Improve error handling. Guido van Rossum <guido@python.org> parents: 438 diff changeset	58 #define CHECK(x) /* Don't know how to check */
56bb1067a880 Improve error handling. Guido van Rossum <guido@python.org> parents: 438 diff changeset	59 #endif
56bb1067a880 Improve error handling. Guido van Rossum <guido@python.org> parents: 438 diff changeset	60
4635 49745ddb4f69 Renamed Barry Warsaw <barry@python.org> parents: 4503 diff changeset	61 static PyObject *
498 56bb1067a880 Improve error handling. Guido van Rossum <guido@python.org> parents: 438 diff changeset	62 math_error()
56bb1067a880 Improve error handling. Guido van Rossum <guido@python.org> parents: 438 diff changeset	63 {
56bb1067a880 Improve error handling. Guido van Rossum <guido@python.org> parents: 438 diff changeset	64 if (errno == EDOM)
4635 49745ddb4f69 Renamed Barry Warsaw <barry@python.org> parents: 4503 diff changeset	65 PyErr_SetString(PyExc_ValueError, "math domain error");
498 56bb1067a880 Improve error handling. Guido van Rossum <guido@python.org> parents: 438 diff changeset	66 else if (errno == ERANGE)
4635 49745ddb4f69 Renamed Barry Warsaw <barry@python.org> parents: 4503 diff changeset	67 PyErr_SetString(PyExc_OverflowError, "math range error");
498 56bb1067a880 Improve error handling. Guido van Rossum <guido@python.org> parents: 438 diff changeset	68 else
4635 49745ddb4f69 Renamed Barry Warsaw <barry@python.org> parents: 4503 diff changeset	69 /* Unexpected math error */
49745ddb4f69 Renamed Barry Warsaw <barry@python.org> parents: 4503 diff changeset	70 PyErr_SetFromErrno(PyExc_ValueError);
498 56bb1067a880 Improve error handling. Guido van Rossum <guido@python.org> parents: 438 diff changeset	71 return NULL;
56bb1067a880 Improve error handling. Guido van Rossum <guido@python.org> parents: 438 diff changeset	72 }
56bb1067a880 Improve error handling. Guido van Rossum <guido@python.org> parents: 438 diff changeset	73
4635 49745ddb4f69 Renamed Barry Warsaw <barry@python.org> parents: 4503 diff changeset	74 static PyObject *
6 fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	75 math_1(args, func)
4635 49745ddb4f69 Renamed Barry Warsaw <barry@python.org> parents: 4503 diff changeset	76 PyObject *args;
49745ddb4f69 Renamed Barry Warsaw <barry@python.org> parents: 4503 diff changeset	77 double (*func) Py_FPROTO((double));
6 fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	78 {
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	79 double x;
4780 abef5006f84b Removed references to getdoublearg and get2doublearg rename macros and Roger E. Masse <rmasse@newcnri.cnri.reston.va.us> parents: 4766 diff changeset	80 if (! PyArg_Parse(args, "d", &x))
6 fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	81 return NULL;
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	82 errno = 0;
5120 a48f3678f9e1 Changes for Lee Busby's SIGFPE patch set. Guido van Rossum <guido@python.org> parents: 4780 diff changeset	83 PyFPE_START_PROTECT("in math_1", return 0)
6 fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	84 x = (*func)(x);
5197 74c12704a0bd New form of PyFPE_END_PROTECT macro. Guido van Rossum <guido@python.org> parents: 5120 diff changeset	85 PyFPE_END_PROTECT(x)
498 56bb1067a880 Improve error handling. Guido van Rossum <guido@python.org> parents: 438 diff changeset	86 CHECK(x);
6 fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	87 if (errno != 0)
498 56bb1067a880 Improve error handling. Guido van Rossum <guido@python.org> parents: 438 diff changeset	88 return math_error();
6 fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	89 else
4635 49745ddb4f69 Renamed Barry Warsaw <barry@python.org> parents: 4503 diff changeset	90 return PyFloat_FromDouble(x);
6 fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	91 }
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	92
4635 49745ddb4f69 Renamed Barry Warsaw <barry@python.org> parents: 4503 diff changeset	93 static PyObject *
6 fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	94 math_2(args, func)
4635 49745ddb4f69 Renamed Barry Warsaw <barry@python.org> parents: 4503 diff changeset	95 PyObject *args;
49745ddb4f69 Renamed Barry Warsaw <barry@python.org> parents: 4503 diff changeset	96 double (*func) Py_FPROTO((double, double));
6 fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	97 {
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	98 double x, y;
4780 abef5006f84b Removed references to getdoublearg and get2doublearg rename macros and Roger E. Masse <rmasse@newcnri.cnri.reston.va.us> parents: 4766 diff changeset	99 if (! PyArg_Parse(args, "(dd)", &x, &y))
6 fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	100 return NULL;
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	101 errno = 0;
5120 a48f3678f9e1 Changes for Lee Busby's SIGFPE patch set. Guido van Rossum <guido@python.org> parents: 4780 diff changeset	102 PyFPE_START_PROTECT("in math_2", return 0)
6 fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	103 x = (*func)(x, y);
5197 74c12704a0bd New form of PyFPE_END_PROTECT macro. Guido van Rossum <guido@python.org> parents: 5120 diff changeset	104 PyFPE_END_PROTECT(x)
498 56bb1067a880 Improve error handling. Guido van Rossum <guido@python.org> parents: 438 diff changeset	105 CHECK(x);
6 fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	106 if (errno != 0)
498 56bb1067a880 Improve error handling. Guido van Rossum <guido@python.org> parents: 438 diff changeset	107 return math_error();
6 fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	108 else
4635 49745ddb4f69 Renamed Barry Warsaw <barry@python.org> parents: 4503 diff changeset	109 return PyFloat_FromDouble(x);
6 fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	110 }
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	111
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	112 #define FUNC1(stubname, func) \
4635 49745ddb4f69 Renamed Barry Warsaw <barry@python.org> parents: 4503 diff changeset	113 static PyObject * stubname(self, args) PyObject self, args; { \
6 fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	114 return math_1(args, func); \
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	115 }
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	116
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	117 #define FUNC2(stubname, func) \
4635 49745ddb4f69 Renamed Barry Warsaw <barry@python.org> parents: 4503 diff changeset	118 static PyObject * stubname(self, args) PyObject self, args; { \
6 fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	119 return math_2(args, func); \
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	120 }
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	121
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	122 FUNC1(math_acos, acos)
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	123 FUNC1(math_asin, asin)
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	124 FUNC1(math_atan, atan)
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	125 FUNC2(math_atan2, atan2)
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	126 FUNC1(math_ceil, ceil)
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	127 FUNC1(math_cos, cos)
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	128 FUNC1(math_cosh, cosh)
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	129 FUNC1(math_exp, exp)
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	130 FUNC1(math_fabs, fabs)
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	131 FUNC1(math_floor, floor)
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	132 FUNC2(math_fmod, fmod)
1986 58eef51e3084 add hypot() Guido van Rossum <guido@python.org> parents: 1746 diff changeset	133 FUNC2(math_hypot, hypot)
6 fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	134 FUNC1(math_log, log)
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	135 FUNC1(math_log10, log10)
320 26426c42a162 Add some err_errno calls that were missing Guido van Rossum <guido@python.org> parents: 289 diff changeset	136 #ifdef MPW_3_1 /* This hack is needed for MPW 3.1 but not for 3.2 ... */
289 c4c278c56e90 Apparently MPW has power() instead of pow(). Guido van Rossum <guido@python.org> parents: 168 diff changeset	137 FUNC2(math_pow, power)
c4c278c56e90 Apparently MPW has power() instead of pow(). Guido van Rossum <guido@python.org> parents: 168 diff changeset	138 #else
6 fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	139 FUNC2(math_pow, pow)
289 c4c278c56e90 Apparently MPW has power() instead of pow(). Guido van Rossum <guido@python.org> parents: 168 diff changeset	140 #endif
6 fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	141 FUNC1(math_sin, sin)
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	142 FUNC1(math_sinh, sinh)
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	143 FUNC1(math_sqrt, sqrt)
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	144 FUNC1(math_tan, tan)
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	145 FUNC1(math_tanh, tanh)
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	146
1746 1940892d2fe3 Merge alpha100 branch back to main trunk Guido van Rossum <guido@python.org> parents: 1319 diff changeset	147
4635 49745ddb4f69 Renamed Barry Warsaw <barry@python.org> parents: 4503 diff changeset	148 static PyObject *
407 9b3d557665a9 Added frexp, ldexp, modf, fmod. Guido van Rossum <guido@python.org> parents: 320 diff changeset	149 math_frexp(self, args)
4635 49745ddb4f69 Renamed Barry Warsaw <barry@python.org> parents: 4503 diff changeset	150 PyObject *self;
49745ddb4f69 Renamed Barry Warsaw <barry@python.org> parents: 4503 diff changeset	151 PyObject *args;
407 9b3d557665a9 Added frexp, ldexp, modf, fmod. Guido van Rossum <guido@python.org> parents: 320 diff changeset	152 {
9b3d557665a9 Added frexp, ldexp, modf, fmod. Guido van Rossum <guido@python.org> parents: 320 diff changeset	153 double x;
9b3d557665a9 Added frexp, ldexp, modf, fmod. Guido van Rossum <guido@python.org> parents: 320 diff changeset	154 int i;
4780 abef5006f84b Removed references to getdoublearg and get2doublearg rename macros and Roger E. Masse <rmasse@newcnri.cnri.reston.va.us> parents: 4766 diff changeset	155 if (! PyArg_Parse(args, "d", &x))
407 9b3d557665a9 Added frexp, ldexp, modf, fmod. Guido van Rossum <guido@python.org> parents: 320 diff changeset	156 return NULL;
9b3d557665a9 Added frexp, ldexp, modf, fmod. Guido van Rossum <guido@python.org> parents: 320 diff changeset	157 errno = 0;
9b3d557665a9 Added frexp, ldexp, modf, fmod. Guido van Rossum <guido@python.org> parents: 320 diff changeset	158 x = frexp(x, &i);
498 56bb1067a880 Improve error handling. Guido van Rossum <guido@python.org> parents: 438 diff changeset	159 CHECK(x);
407 9b3d557665a9 Added frexp, ldexp, modf, fmod. Guido van Rossum <guido@python.org> parents: 320 diff changeset	160 if (errno != 0)
498 56bb1067a880 Improve error handling. Guido van Rossum <guido@python.org> parents: 438 diff changeset	161 return math_error();
4635 49745ddb4f69 Renamed Barry Warsaw <barry@python.org> parents: 4503 diff changeset	162 return Py_BuildValue("(di)", x, i);
407 9b3d557665a9 Added frexp, ldexp, modf, fmod. Guido van Rossum <guido@python.org> parents: 320 diff changeset	163 }
9b3d557665a9 Added frexp, ldexp, modf, fmod. Guido van Rossum <guido@python.org> parents: 320 diff changeset	164
4635 49745ddb4f69 Renamed Barry Warsaw <barry@python.org> parents: 4503 diff changeset	165 static PyObject *
407 9b3d557665a9 Added frexp, ldexp, modf, fmod. Guido van Rossum <guido@python.org> parents: 320 diff changeset	166 math_ldexp(self, args)
4635 49745ddb4f69 Renamed Barry Warsaw <barry@python.org> parents: 4503 diff changeset	167 PyObject *self;
49745ddb4f69 Renamed Barry Warsaw <barry@python.org> parents: 4503 diff changeset	168 PyObject *args;
407 9b3d557665a9 Added frexp, ldexp, modf, fmod. Guido van Rossum <guido@python.org> parents: 320 diff changeset	169 {
9b3d557665a9 Added frexp, ldexp, modf, fmod. Guido van Rossum <guido@python.org> parents: 320 diff changeset	170 double x, y;
9b3d557665a9 Added frexp, ldexp, modf, fmod. Guido van Rossum <guido@python.org> parents: 320 diff changeset	171 /* Cheat -- allow float as second argument */
4780 abef5006f84b Removed references to getdoublearg and get2doublearg rename macros and Roger E. Masse <rmasse@newcnri.cnri.reston.va.us> parents: 4766 diff changeset	172 if (! PyArg_Parse(args, "(dd)", &x, &y))
407 9b3d557665a9 Added frexp, ldexp, modf, fmod. Guido van Rossum <guido@python.org> parents: 320 diff changeset	173 return NULL;
9b3d557665a9 Added frexp, ldexp, modf, fmod. Guido van Rossum <guido@python.org> parents: 320 diff changeset	174 errno = 0;
5120 a48f3678f9e1 Changes for Lee Busby's SIGFPE patch set. Guido van Rossum <guido@python.org> parents: 4780 diff changeset	175 PyFPE_START_PROTECT("ldexp", return 0)
407 9b3d557665a9 Added frexp, ldexp, modf, fmod. Guido van Rossum <guido@python.org> parents: 320 diff changeset	176 x = ldexp(x, (int)y);
5197 74c12704a0bd New form of PyFPE_END_PROTECT macro. Guido van Rossum <guido@python.org> parents: 5120 diff changeset	177 PyFPE_END_PROTECT(x)
498 56bb1067a880 Improve error handling. Guido van Rossum <guido@python.org> parents: 438 diff changeset	178 CHECK(x);
407 9b3d557665a9 Added frexp, ldexp, modf, fmod. Guido van Rossum <guido@python.org> parents: 320 diff changeset	179 if (errno != 0)
498 56bb1067a880 Improve error handling. Guido van Rossum <guido@python.org> parents: 438 diff changeset	180 return math_error();
407 9b3d557665a9 Added frexp, ldexp, modf, fmod. Guido van Rossum <guido@python.org> parents: 320 diff changeset	181 else
4635 49745ddb4f69 Renamed Barry Warsaw <barry@python.org> parents: 4503 diff changeset	182 return PyFloat_FromDouble(x);
407 9b3d557665a9 Added frexp, ldexp, modf, fmod. Guido van Rossum <guido@python.org> parents: 320 diff changeset	183 }
9b3d557665a9 Added frexp, ldexp, modf, fmod. Guido van Rossum <guido@python.org> parents: 320 diff changeset	184
4635 49745ddb4f69 Renamed Barry Warsaw <barry@python.org> parents: 4503 diff changeset	185 static PyObject *
407 9b3d557665a9 Added frexp, ldexp, modf, fmod. Guido van Rossum <guido@python.org> parents: 320 diff changeset	186 math_modf(self, args)
4635 49745ddb4f69 Renamed Barry Warsaw <barry@python.org> parents: 4503 diff changeset	187 PyObject *self;
49745ddb4f69 Renamed Barry Warsaw <barry@python.org> parents: 4503 diff changeset	188 PyObject *args;
407 9b3d557665a9 Added frexp, ldexp, modf, fmod. Guido van Rossum <guido@python.org> parents: 320 diff changeset	189 {
9b3d557665a9 Added frexp, ldexp, modf, fmod. Guido van Rossum <guido@python.org> parents: 320 diff changeset	190 double x, y;
4780 abef5006f84b Removed references to getdoublearg and get2doublearg rename macros and Roger E. Masse <rmasse@newcnri.cnri.reston.va.us> parents: 4766 diff changeset	191 if (! PyArg_Parse(args, "d", &x))
407 9b3d557665a9 Added frexp, ldexp, modf, fmod. Guido van Rossum <guido@python.org> parents: 320 diff changeset	192 return NULL;
9b3d557665a9 Added frexp, ldexp, modf, fmod. Guido van Rossum <guido@python.org> parents: 320 diff changeset	193 errno = 0;
1746 1940892d2fe3 Merge alpha100 branch back to main trunk Guido van Rossum <guido@python.org> parents: 1319 diff changeset	194 #ifdef MPW /* MPW C modf expects pointer to extended as second argument */
1940892d2fe3 Merge alpha100 branch back to main trunk Guido van Rossum <guido@python.org> parents: 1319 diff changeset	195 {
1940892d2fe3 Merge alpha100 branch back to main trunk Guido van Rossum <guido@python.org> parents: 1319 diff changeset	196 extended e;
1940892d2fe3 Merge alpha100 branch back to main trunk Guido van Rossum <guido@python.org> parents: 1319 diff changeset	197 x = modf(x, &e);
1940892d2fe3 Merge alpha100 branch back to main trunk Guido van Rossum <guido@python.org> parents: 1319 diff changeset	198 y = e;
1940892d2fe3 Merge alpha100 branch back to main trunk Guido van Rossum <guido@python.org> parents: 1319 diff changeset	199 }
1940892d2fe3 Merge alpha100 branch back to main trunk Guido van Rossum <guido@python.org> parents: 1319 diff changeset	200 #else
407 9b3d557665a9 Added frexp, ldexp, modf, fmod. Guido van Rossum <guido@python.org> parents: 320 diff changeset	201 x = modf(x, &y);
1746 1940892d2fe3 Merge alpha100 branch back to main trunk Guido van Rossum <guido@python.org> parents: 1319 diff changeset	202 #endif
498 56bb1067a880 Improve error handling. Guido van Rossum <guido@python.org> parents: 438 diff changeset	203 CHECK(x);
407 9b3d557665a9 Added frexp, ldexp, modf, fmod. Guido van Rossum <guido@python.org> parents: 320 diff changeset	204 if (errno != 0)
498 56bb1067a880 Improve error handling. Guido van Rossum <guido@python.org> parents: 438 diff changeset	205 return math_error();
4635 49745ddb4f69 Renamed Barry Warsaw <barry@python.org> parents: 4503 diff changeset	206 return Py_BuildValue("(dd)", x, y);
407 9b3d557665a9 Added frexp, ldexp, modf, fmod. Guido van Rossum <guido@python.org> parents: 320 diff changeset	207 }
6 fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	208
4635 49745ddb4f69 Renamed Barry Warsaw <barry@python.org> parents: 4503 diff changeset	209 static PyMethodDef math_methods[] = {
6 fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	210 {"acos", math_acos},
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	211 {"asin", math_asin},
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	212 {"atan", math_atan},
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	213 {"atan2", math_atan2},
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	214 {"ceil", math_ceil},
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	215 {"cos", math_cos},
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	216 {"cosh", math_cosh},
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	217 {"exp", math_exp},
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	218 {"fabs", math_fabs},
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	219 {"floor", math_floor},
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	220 {"fmod", math_fmod},
407 9b3d557665a9 Added frexp, ldexp, modf, fmod. Guido van Rossum <guido@python.org> parents: 320 diff changeset	221 {"frexp", math_frexp},
1986 58eef51e3084 add hypot() Guido van Rossum <guido@python.org> parents: 1746 diff changeset	222 {"hypot", math_hypot},
6 fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	223 {"ldexp", math_ldexp},
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	224 {"log", math_log},
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	225 {"log10", math_log10},
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	226 {"modf", math_modf},
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	227 {"pow", math_pow},
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	228 {"sin", math_sin},
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	229 {"sinh", math_sinh},
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	230 {"sqrt", math_sqrt},
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	231 {"tan", math_tan},
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	232 {"tanh", math_tanh},
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	233 {NULL, NULL} /* sentinel */
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	234 };
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	235
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	236 void
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	237 initmath()
fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	238 {
4635 49745ddb4f69 Renamed Barry Warsaw <barry@python.org> parents: 4503 diff changeset	239 PyObject m, d, *v;
42 4835c2d38b84 Take out duplication of code in initmodule(). Guido van Rossum <guido@python.org> parents: 6 diff changeset	240
4635 49745ddb4f69 Renamed Barry Warsaw <barry@python.org> parents: 4503 diff changeset	241 m = Py_InitModule("math", math_methods);
49745ddb4f69 Renamed Barry Warsaw <barry@python.org> parents: 4503 diff changeset	242 d = PyModule_GetDict(m);
4752 7367fb107108 Better error checking in initmath(). Barry Warsaw <barry@python.org> parents: 4635 diff changeset	243
7367fb107108 Better error checking in initmath(). Barry Warsaw <barry@python.org> parents: 4635 diff changeset	244 if (!(v = PyFloat_FromDouble(atan(1.0) * 4.0)))
7367fb107108 Better error checking in initmath(). Barry Warsaw <barry@python.org> parents: 4635 diff changeset	245 goto finally;
7367fb107108 Better error checking in initmath(). Barry Warsaw <barry@python.org> parents: 4635 diff changeset	246 if (PyDict_SetItemString(d, "pi", v) < 0)
7367fb107108 Better error checking in initmath(). Barry Warsaw <barry@python.org> parents: 4635 diff changeset	247 goto finally;
4635 49745ddb4f69 Renamed Barry Warsaw <barry@python.org> parents: 4503 diff changeset	248 Py_DECREF(v);
4752 7367fb107108 Better error checking in initmath(). Barry Warsaw <barry@python.org> parents: 4635 diff changeset	249
7367fb107108 Better error checking in initmath(). Barry Warsaw <barry@python.org> parents: 4635 diff changeset	250 if (!(v = PyFloat_FromDouble(exp(1.0))))
7367fb107108 Better error checking in initmath(). Barry Warsaw <barry@python.org> parents: 4635 diff changeset	251 goto finally;
4765 f8b36c0ec114 Correct 1-char typo / syntax error. Guido van Rossum <guido@python.org> parents: 4752 diff changeset	252 if (PyDict_SetItemString(d, "e", v) < 0)
4752 7367fb107108 Better error checking in initmath(). Barry Warsaw <barry@python.org> parents: 4635 diff changeset	253 goto finally;
4635 49745ddb4f69 Renamed Barry Warsaw <barry@python.org> parents: 4503 diff changeset	254 Py_DECREF(v);
4766 9604d6784675 Correct another mistake (initmath() always fell through to fatal error). Guido van Rossum <guido@python.org> parents: 4765 diff changeset	255 return;
4752 7367fb107108 Better error checking in initmath(). Barry Warsaw <barry@python.org> parents: 4635 diff changeset	256
7367fb107108 Better error checking in initmath(). Barry Warsaw <barry@python.org> parents: 4635 diff changeset	257 finally:
7367fb107108 Better error checking in initmath(). Barry Warsaw <barry@python.org> parents: 4635 diff changeset	258 Py_FatalError("can't initialize math module");
6 fc6fcd7df4f7 Initial revision Guido van Rossum <guido@python.org> parents: diff changeset	259 }

Mercurial > cpython-lru_cache-weakref

annotate Modules/mathmodule.c @ 6719:faebc1940432 legacy-trunk