From 49b11fed7009804a85740c237fe204bd4baab8b2 Mon Sep 17 00:00:00 2001 From: Guido van Rossum Date: Thu, 26 Jan 1995 00:38:22 +0000 Subject: move callable() here --- Objects/object.c | 29 +++++++++++++++++++++++++++++ 1 file changed, 29 insertions(+) diff --git a/Objects/object.c b/Objects/object.c index 63c55ce..73353e4 100644 --- a/Objects/object.c +++ b/Objects/object.c @@ -386,6 +386,35 @@ coerce(pv, pw) } +/* Test whether an object can be called */ + +int +callable(x) + object *x; +{ + if (x == NULL) + return 0; + if (x->ob_type->tp_call != NULL || + is_funcobject(x) || + is_instancemethodobject(x) || + is_methodobject(x) || + is_classobject(x)) + return 1; + if (is_instanceobject(x)) { + object *call = getattr(x, "__call__"); + if (call == NULL) { + err_clear(); + return 0; + } + /* Could test recursively but don't, for fear of endless + recursion if some joker sets self.__call__ = self */ + DECREF(call); + return 1; + } + return 0; +} + + /* NoObject is usable as a non-NULL undefined value, used by the macro None. There is (and should be!) no way to create other objects of this type, -- cgit v0.12