// tp_descr_get slot, bind a function to an object.
static PyObject *Nuitka_Function_descr_get( PyObject *function, PyObject *object, PyObject *klass )
{
assert( Nuitka_Function_Check( function ) );
#if PYTHON_VERSION >= 300
if ( object == NULL || object == Py_None )
{
return INCREASE_REFCOUNT( function );
}
#endif
return Nuitka_Method_New(
(Nuitka_FunctionObject *)function,
object == Py_None ? NULL : object,
klass
);
}
static char const *GET_CALLABLE_DESC( PyObject *object )
{
if ( Nuitka_Function_Check( object ) || Nuitka_Generator_Check( object ) || PyMethod_Check( object ) || PyFunction_Check( object ) || PyCFunction_Check( object ) )
{
return "()";
}
#if PYTHON_VERSION < 300
else if ( PyClass_Check( object ) )
{
return " constructor";
}
else if ( PyInstance_Check( object ))
{
return " instance";
}
#endif
else
{
return " object";
}
}
static PyObject *Nuitka_Method_tp_new( PyTypeObject* type, PyObject* args, PyObject *kw )
{
PyObject *func;
PyObject *self;
PyObject *klass = NULL;
if ( !_PyArg_NoKeywords( "instancemethod", kw ) )
{
return NULL;
}
else if ( !PyArg_UnpackTuple( args, "compiled_method", 2, 3, &func, &self, &klass ) )
{
return NULL;
}
else if ( !PyCallable_Check( func ) )
{
PyErr_Format( PyExc_TypeError, "first argument must be callable" );
return NULL;
}
else
{
if ( self == Py_None )
{
self = NULL;
}
if ( self == NULL && klass == NULL )
{
PyErr_Format( PyExc_TypeError, "unbound methods must have non-NULL im_class" );
return NULL;
}
}
assert( Nuitka_Function_Check( func ) );
return Nuitka_Method_New( (struct Nuitka_FunctionObject *)func, self, klass );
}
static char const *GET_CALLABLE_NAME( PyObject *object )
{
if ( Nuitka_Function_Check( object ) )
{
return Nuitka_String_AsString( Nuitka_Function_GetName( object ) );
}
else if ( Nuitka_Generator_Check( object ) )
{
return Nuitka_String_AsString( Nuitka_Generator_GetName( object ) );
}
else if ( PyMethod_Check( object ) )
{
return PyEval_GetFuncName( PyMethod_GET_FUNCTION( object ) );
}
else if ( PyFunction_Check( object ) )
{
return Nuitka_String_AsString( ((PyFunctionObject*)object)->func_name );
}
#if PYTHON_VERSION < 300
else if ( PyInstance_Check( object ) )
{
return Nuitka_String_AsString( ((PyInstanceObject*)object)->in_class->cl_name );
}
else if ( PyClass_Check( object ) )
{
return Nuitka_String_AsString( ((PyClassObject*)object)->cl_name );
}
#endif
else if ( PyCFunction_Check( object ) )
{
return ((PyCFunctionObject*)object)->m_ml->ml_name;
}
else
{
return Py_TYPE( object )->tp_name;
}
}
PyObject *CALL_FUNCTION_WITH_ARGS9( PyObject *called, PyObject *arg1, PyObject *arg2, PyObject *arg3, PyObject *arg4, PyObject *arg5, PyObject *arg6, PyObject *arg7, PyObject *arg8, PyObject *arg9 )
{
assertObject( called );
// Check if arguments are valid objects in debug mode.
#ifndef __NUITKA_NO_ASSERT__
PyObject *args_for_test[] = { arg1, arg2, arg3, arg4, arg5, arg6, arg7, arg8, arg9 };
for( size_t i = 0; i < sizeof( args_for_test ) / sizeof( PyObject * ); i++ )
{
assertObject( args_for_test[ i ] );
}
#endif
if ( Nuitka_Function_Check( called ) )
{
if (unlikely( Py_EnterRecursiveCall( (char *)" while calling a Python object" ) ))
{
return NULL;
}
Nuitka_FunctionObject *function = (Nuitka_FunctionObject *)called;
PyObject *result;
PyObject *args[] = { arg1, arg2, arg3, arg4, arg5, arg6, arg7, arg8, arg9 };
if ( function->m_direct_arg_parser )
{
result = function->m_direct_arg_parser(
function,
args,
sizeof( args ) / sizeof( PyObject * )
);
}
else
{
result = function->m_code(
function,
args,
sizeof( args ) / sizeof( PyObject * ),
NULL
);
}
Py_LeaveRecursiveCall();
return result;
}
else if ( Nuitka_Method_Check( called ) )
{
Nuitka_MethodObject *method = (Nuitka_MethodObject *)called;
// Unbound method without arguments, let the error path be slow.
if ( method->m_object != NULL )
{
if (unlikely( Py_EnterRecursiveCall( (char *)" while calling a Python object" ) ))
{
return NULL;
}
PyObject *args[] = {
method->m_object,
arg1, arg2, arg3, arg4, arg5, arg6, arg7, arg8, arg9
};
PyObject *result;
if ( method->m_function->m_direct_arg_parser )
{
result = method->m_function->m_direct_arg_parser(
method->m_function,
args,
sizeof( args ) / sizeof( PyObject * )
);
}
else
{
result = method->m_function->m_code(
method->m_function,
args,
sizeof( args ) / sizeof( PyObject * ),
NULL
);
}
Py_LeaveRecursiveCall();
return result;
}
}
else if ( PyFunction_Check( called ) )
{
PyObject *args[] = { arg1, arg2, arg3, arg4, arg5, arg6, arg7, arg8, arg9 };
return fast_python_call(
called,
args,
sizeof( args ) / sizeof( PyObject * )
);
}
PyObject *args[] = { arg1, arg2, arg3, arg4, arg5, arg6, arg7, arg8, arg9 };
PyObject *pos_args = MAKE_TUPLE( args, sizeof( args ) / sizeof( PyObject * ) );
PyObject *result = CALL_FUNCTION(
called,
pos_args,
NULL
);
Py_DECREF( pos_args );
return result;
}