From 5b7f945bc3e86d26b7570d1dbc54f8012ba19d88 Mon Sep 17 00:00:00 2001 From: Guido van Rossum Date: Wed, 3 Apr 1991 19:06:03 +0000 Subject: Moved get*doublearg() routines to modsupport.c --- Modules/mathmodule.c | 29 ----------------------------- 1 file changed, 29 deletions(-) diff --git a/Modules/mathmodule.c b/Modules/mathmodule.c index 7b2bdf2..f6e7286 100644 --- a/Modules/mathmodule.c +++ b/Modules/mathmodule.c @@ -35,35 +35,6 @@ extern int errno; #include -static int -getdoublearg(args, px) - register object *args; - double *px; -{ - if (args == NULL) - return err_badarg(); - if (is_floatobject(args)) { - *px = getfloatvalue(args); - return 1; - } - if (is_intobject(args)) { - *px = getintvalue(args); - return 1; - } - return err_badarg(); -} - -static int -get2doublearg(args, px, py) - register object *args; - double *px, *py; -{ - if (args == NULL || !is_tupleobject(args) || gettuplesize(args) != 2) - return err_badarg(); - return getdoublearg(gettupleitem(args, 0), px) && - getdoublearg(gettupleitem(args, 1), py); -} - static object * math_1(args, func) object *args; -- cgit v0.12