static PyObject *fast_cfunction(PyObject *, PyObject ***, int);
static PyObject *do_call(PyObject *, PyObject ***, int, int);
static PyObject *ext_do_call(PyObject *, PyObject ***, int, int, int);
-static PyObject *update_keyword_args(PyObject *, int, PyObject ***, PyObject *);
+static PyObject *update_keyword_args(PyObject *, int, PyObject ***,PyObject *);
static PyObject *update_star_args(int, int, PyObject *, PyObject ***);
static PyObject *load_args(PyObject ***, int);
#define CALL_FLAG_VAR 1
for (j = 0; j < co->co_argcount; j++) {
PyObject *nm = PyTuple_GET_ITEM(
co->co_varnames, j);
- if (PyObject_Compare(keyword, nm) == 0)
+ int cmp = PyObject_RichCompareBool(
+ keyword, nm, Py_EQ);
+ if (cmp > 0)
break;
+ else if (cmp < 0)
+ goto fail;
}
/* Check errors from Compare */
if (PyErr_Occurred())
}
else {
if (GETLOCAL(j) != NULL) {
- PyErr_Format(PyExc_TypeError,
+ PyErr_Format(PyExc_TypeError,
"%.200s() got multiple "
"values for keyword "
"argument '%.400s'",
_PyCode_GETCODEPTR(co, &first_instr);
next_instr = first_instr;
stack_pointer = f->f_valuestack;
-
+
why = WHY_NOT;
err = 0;
x = Py_None; /* Not a reference, just anything non-NULL */
w = NULL;
-
+
for (;;) {
/* Do periodic things. Doing this every time through
the loop would add too much overhead, so we do it
event needs attention (e.g. a signal handler or
async I/O handler); see Py_AddPendingCall() and
Py_MakePendingCalls() above. */
-
+
if (things_to_do || --tstate->ticker < 0) {
tstate->ticker = tstate->interp->checkinterval;
if (things_to_do) {
#if defined(Py_DEBUG) || defined(LLTRACE)
f->f_lasti = INSTR_OFFSET();
#endif
-
+
opcode = NEXTOP();
if (HAS_ARG(opcode))
oparg = NEXTARG();
#ifdef LLTRACE
/* Instruction tracing */
-
+
if (lltrace) {
if (HAS_ARG(opcode)) {
printf("%d: %d, %d\n",
/* Main switch on opcode */
switch (opcode) {
-
+
/* BEWARE!
It is essential that any operation that fails sets either
x to NULL, err to nonzero, or why to anything but WHY_NOT,
and that no operation that succeeds does this! */
-
+
/* case STOP_CODE: this is an error! */
-
+
case POP_TOP:
v = POP();
Py_DECREF(v);
continue;
-
+
case ROT_TWO:
v = POP();
w = POP();
PUSH(v);
PUSH(w);
continue;
-
+
case ROT_THREE:
v = POP();
w = POP();
PUSH(x);
PUSH(w);
continue;
-
+
case ROT_FOUR:
u = POP();
v = POP();
PUSH(w);
PUSH(v);
continue;
-
+
case DUP_TOP:
v = TOP();
Py_INCREF(v);
PUSH(v);
continue;
-
+
case DUP_TOPX:
switch (oparg) {
case 1:
PUSH(x);
if (x != NULL) continue;
break;
-
+
case UNARY_NEGATIVE:
v = POP();
x = PyNumber_Negative(v);
PUSH(x);
if (x != NULL) continue;
break;
-
+
case UNARY_NOT:
v = POP();
err = PyObject_IsTrue(v);
continue;
}
break;
-
+
case UNARY_CONVERT:
v = POP();
x = PyObject_Repr(v);
PUSH(x);
if (x != NULL) continue;
break;
-
+
case UNARY_INVERT:
v = POP();
x = PyNumber_Invert(v);
PUSH(x);
if (x != NULL) continue;
break;
-
+
case BINARY_POWER:
w = POP();
v = POP();
PUSH(x);
if (x != NULL) continue;
break;
-
+
case BINARY_MULTIPLY:
w = POP();
v = POP();
PUSH(x);
if (x != NULL) continue;
break;
-
+
case BINARY_DIVIDE:
w = POP();
v = POP();
PUSH(x);
if (x != NULL) continue;
break;
-
+
case BINARY_MODULO:
w = POP();
v = POP();
PUSH(x);
if (x != NULL) continue;
break;
-
+
case BINARY_ADD:
w = POP();
v = POP();
PUSH(x);
if (x != NULL) continue;
break;
-
+
case BINARY_SUBTRACT:
w = POP();
v = POP();
PUSH(x);
if (x != NULL) continue;
break;
-
+
case BINARY_SUBSCR:
w = POP();
v = POP();
PUSH(x);
if (x != NULL) continue;
break;
-
+
case BINARY_LSHIFT:
w = POP();
v = POP();
PUSH(x);
if (x != NULL) continue;
break;
-
+
case BINARY_RSHIFT:
w = POP();
v = POP();
PUSH(x);
if (x != NULL) continue;
break;
-
+
case BINARY_AND:
w = POP();
v = POP();
PUSH(x);
if (x != NULL) continue;
break;
-
+
case BINARY_XOR:
w = POP();
v = POP();
PUSH(x);
if (x != NULL) continue;
break;
-
+
case BINARY_OR:
w = POP();
v = POP();
PUSH(x);
if (x != NULL) continue;
break;
-
+
case INPLACE_MULTIPLY:
w = POP();
v = POP();
PUSH(x);
if (x != NULL) continue;
break;
-
+
case INPLACE_DIVIDE:
w = POP();
v = POP();
PUSH(x);
if (x != NULL) continue;
break;
-
+
case INPLACE_MODULO:
w = POP();
v = POP();
PUSH(x);
if (x != NULL) continue;
break;
-
+
case INPLACE_ADD:
w = POP();
v = POP();
PUSH(x);
if (x != NULL) continue;
break;
-
+
case INPLACE_SUBTRACT:
w = POP();
v = POP();
PUSH(x);
if (x != NULL) continue;
break;
-
+
case INPLACE_LSHIFT:
w = POP();
v = POP();
PUSH(x);
if (x != NULL) continue;
break;
-
+
case INPLACE_RSHIFT:
w = POP();
v = POP();
PUSH(x);
if (x != NULL) continue;
break;
-
+
case INPLACE_AND:
w = POP();
v = POP();
PUSH(x);
if (x != NULL) continue;
break;
-
+
case INPLACE_XOR:
w = POP();
v = POP();
PUSH(x);
if (x != NULL) continue;
break;
-
+
case INPLACE_OR:
w = POP();
v = POP();
PUSH(x);
if (x != NULL) continue;
break;
-
+
case STORE_SLICE+0:
case STORE_SLICE+1:
case STORE_SLICE+2:
Py_XDECREF(w);
if (err == 0) continue;
break;
-
+
case DELETE_SLICE+0:
case DELETE_SLICE+1:
case DELETE_SLICE+2:
Py_XDECREF(w);
if (err == 0) continue;
break;
-
+
case STORE_SUBSCR:
w = POP();
v = POP();
Py_DECREF(w);
if (err == 0) continue;
break;
-
+
case DELETE_SUBSCR:
w = POP();
v = POP();
if (err == 0)
continue;
break;
-
+
case PRINT_NEWLINE_TO:
w = stream = POP();
/* fall through to PRINT_NEWLINE */
Py_XDECREF(stream);
stream = NULL;
break;
-
+
#ifdef CASE_TOO_BIG
default: switch (opcode) {
break;
}
break;
-
+
case LOAD_LOCALS:
if ((x = f->f_locals) == NULL) {
PyErr_SetString(PyExc_SystemError,
Py_INCREF(x);
PUSH(x);
break;
-
+
case RETURN_VALUE:
retval = POP();
why = WHY_RETURN;
Py_DECREF(v);
Py_DECREF(w);
break;
-
+
case POP_BLOCK:
{
PyTryBlock *b = PyFrame_BlockPop(f);
}
}
break;
-
+
case END_FINALLY:
v = POP();
if (PyInt_Check(v)) {
}
Py_DECREF(v);
break;
-
+
case BUILD_CLASS:
u = POP();
v = POP();
Py_DECREF(v);
Py_DECREF(w);
break;
-
+
case STORE_NAME:
w = GETNAMEV(oparg);
v = POP();
err = PyDict_SetItem(x, w, v);
Py_DECREF(v);
break;
-
+
case DELETE_NAME:
w = GETNAMEV(oparg);
if ((x = f->f_locals) == NULL) {
break;
}
if ((err = PyDict_DelItem(x, w)) != 0)
- format_exc_check_arg(PyExc_NameError,
+ format_exc_check_arg(PyExc_NameError,
NAME_ERROR_MSG ,w);
break;
}
Py_DECREF(v);
break;
-
+
case STORE_ATTR:
w = GETNAMEV(oparg);
v = POP();
Py_DECREF(v);
Py_DECREF(u);
break;
-
+
case DELETE_ATTR:
w = GETNAMEV(oparg);
v = POP();
/* del v.w */
Py_DECREF(v);
break;
-
+
case STORE_GLOBAL:
w = GETNAMEV(oparg);
v = POP();
err = PyDict_SetItem(f->f_globals, w, v);
Py_DECREF(v);
break;
-
+
case DELETE_GLOBAL:
w = GETNAMEV(oparg);
if ((err = PyDict_DelItem(f->f_globals, w)) != 0)
format_exc_check_arg(
PyExc_NameError, NAME_ERROR_MSG ,w);
break;
-
+
case LOAD_CONST:
x = GETCONST(oparg);
Py_INCREF(x);
PUSH(x);
break;
-
+
case LOAD_NAME:
w = GETNAMEV(oparg);
if ((x = f->f_locals) == NULL) {
x = PyDict_GetItem(f->f_builtins, w);
if (x == NULL) {
format_exc_check_arg(
- PyExc_NameError,
+ PyExc_NameError,
NAME_ERROR_MSG ,w);
break;
}
Py_INCREF(x);
PUSH(x);
break;
-
+
case LOAD_GLOBAL:
w = GETNAMEV(oparg);
x = PyDict_GetItem(f->f_globals, w);
x = PyDict_GetItem(f->f_builtins, w);
if (x == NULL) {
format_exc_check_arg(
- PyExc_NameError,
+ PyExc_NameError,
NAME_ERROR_MSG ,w);
break;
}
}
SETLOCAL(oparg, NULL);
continue;
-
+
case BUILD_TUPLE:
x = PyTuple_New(oparg);
if (x != NULL) {
continue;
}
break;
-
+
case BUILD_LIST:
x = PyList_New(oparg);
if (x != NULL) {
continue;
}
break;
-
+
case BUILD_MAP:
x = PyDict_New();
PUSH(x);
if (x != NULL) continue;
break;
-
+
case LOAD_ATTR:
w = GETNAMEV(oparg);
v = POP();
PUSH(x);
if (x != NULL) continue;
break;
-
+
case COMPARE_OP:
w = POP();
v = POP();
PUSH(x);
if (x != NULL) continue;
break;
-
+
case IMPORT_NAME:
w = GETNAMEV(oparg);
x = PyDict_GetItemString(f->f_builtins, "__import__");
PUSH(x);
if (x != NULL) continue;
break;
-
+
case IMPORT_STAR:
v = POP();
PyFrame_FastToLocals(f);
case JUMP_FORWARD:
JUMPBY(oparg);
continue;
-
+
case JUMP_IF_FALSE:
err = PyObject_IsTrue(TOP());
if (err > 0)
else
break;
continue;
-
+
case JUMP_IF_TRUE:
err = PyObject_IsTrue(TOP());
if (err > 0) {
else
break;
continue;
-
+
case JUMP_ABSOLUTE:
JUMPTO(oparg);
continue;
-
+
case FOR_LOOP:
/* for v in s: ...
On entry: stack contains s, i.
}
}
break;
-
+
case SETUP_LOOP:
case SETUP_EXCEPT:
case SETUP_FINALLY:
PyFrame_BlockSetup(f, opcode, INSTR_OFFSET() + oparg,
STACK_LEVEL());
continue;
-
+
case SET_LINENO:
#ifdef LLTRACE
if (lltrace)
if (PyCFunction_Check(func)) {
if (PyCFunction_GET_FLAGS(func) == 0) {
x = fast_cfunction(func,
- &stack_pointer, na);
+ &stack_pointer, na);
} else {
x = do_call(func, &stack_pointer,
na, nk);
}
} else {
- if (PyMethod_Check(func)
+ if (PyMethod_Check(func)
&& PyMethod_GET_SELF(func) != NULL) {
/* optimize access to bound methods */
PyObject *self = PyMethod_GET_SELF(func);
*pfunc = self;
na++;
n++;
- } else
+ } else
Py_INCREF(func);
if (PyFunction_Check(func)) {
x = fast_function(func, &stack_pointer,
- n, na, nk);
+ n, na, nk);
} else {
x = do_call(func, &stack_pointer,
na, nk);
Py_DECREF(w);
}
PUSH(x);
- if (x != NULL)
+ if (x != NULL)
continue;
break;
}
-
+
case CALL_FUNCTION_VAR:
case CALL_FUNCTION_KW:
case CALL_FUNCTION_VAR_KW:
func = *pfunc;
f->f_lasti = INSTR_OFFSET() - 3; /* For tracing */
- if (PyMethod_Check(func)
+ if (PyMethod_Check(func)
&& PyMethod_GET_SELF(func) != NULL) {
PyObject *self = PyMethod_GET_SELF(func);
Py_INCREF(self);
*pfunc = self;
na++;
n++;
- } else
+ } else
Py_INCREF(func);
x = ext_do_call(func, &stack_pointer, flags, na, nk);
Py_DECREF(func);
Py_DECREF(w);
}
PUSH(x);
- if (x != NULL)
+ if (x != NULL)
continue;
break;
}
-
+
case MAKE_FUNCTION:
v = POP(); /* code object */
x = PyFunction_New(v, f->f_globals);
} /* switch */
on_error:
-
+
/* Quickly continue if no error occurred */
-
+
if (why == WHY_NOT) {
if (err == 0 && x != NULL) {
#ifdef CHECKEXC
}
/* Double-check exception status */
-
+
if (why == WHY_EXCEPTION || why == WHY_RERAISE) {
if (!PyErr_Occurred()) {
PyErr_SetString(PyExc_SystemError,
#endif
/* Log traceback info if this is a real exception */
-
+
if (why == WHY_EXCEPTION) {
f->f_lasti = INSTR_OFFSET() - 1;
if (HAS_ARG(opcode))
call_exc_trace(&tstate->sys_profilefunc,
(PyObject**)0, f);
}
-
+
/* For the rest, treat WHY_RERAISE as WHY_EXCEPTION */
-
+
if (why == WHY_RERAISE)
why = WHY_EXCEPTION;
/* Unwind stacks if a (pseudo) exception occurred */
-
+
while (why != WHY_NOT && f->f_iblock > 0) {
PyTryBlock *b = PyFrame_BlockPop(f);
while (STACK_LEVEL() > b->b_level) {
} /* unwind stack */
/* End the loop if we still have an error (or return) */
-
+
if (why != WHY_NOT)
break;
-
+
} /* main loop */
-
+
/* Pop remaining stack entries */
-
+
while (!EMPTY()) {
v = POP();
Py_XDECREF(v);
}
-
+
if (why != WHY_RETURN)
retval = NULL;
-
+
if (f->f_trace) {
if (why == WHY_RETURN) {
if (call_trace(&f->f_trace, &f->f_trace, f,
}
}
}
-
+
if (tstate->sys_profilefunc && why == WHY_RETURN) {
if (call_trace(&tstate->sys_profilefunc, (PyObject**)0,
f, "return", retval)) {
--tstate->recursion_depth;
fail: /* Jump here from prelude on failure */
-
+
/* Restore previous frame and release the current one */
tstate->frame = f->f_back;
Py_DECREF(f);
-
+
return retval;
}
static void
-set_exc_info(PyThreadState *tstate, PyObject *type, PyObject *value, PyObject *tb)
+set_exc_info(PyThreadState *tstate,
+ PyObject *type, PyObject *value, PyObject *tb)
{
PyFrameObject *frame;
PyObject *tmp_type, *tmp_value, *tmp_tb;
Py_XINCREF(value);
Py_XINCREF(tb);
}
-
+
/* We support the following forms of raise:
raise <class>, <classinstance>
raise <class>, <argument tuple>
{
int i;
PyObject *w;
-
+
for (i = 0; i < argcnt; i++) {
if (! (w = PySequence_GetItem(v, i))) {
if (PyErr_ExceptionMatches(PyExc_IndexError))
PyThreadState *tstate = f->f_tstate;
PyObject *args, *what;
PyObject *res = NULL;
-
+
if (tstate->tracing) {
/* Don't do recursive traces */
if (p_newtrace) {
}
return 0;
}
-
+
args = PyTuple_New(3);
if (args == NULL)
goto cleanup;
if (result == NULL && !PyErr_Occurred())
PyErr_SetString(PyExc_SystemError,
"NULL result without error in call_object");
-
+
return result;
}
d = NULL;
nd = 0;
}
-
+
if (kw != NULL) {
int pos, i;
nk = PyDict_Size(kw);
k = NULL;
nk = 0;
}
-
+
result = eval_code2(
(PyCodeObject *)PyFunction_GET_CODE(func),
PyFunction_GET_GLOBALS(func), (PyObject *)NULL,
&PyTuple_GET_ITEM(arg, 0), PyTuple_Size(arg),
k, nk,
d, nd);
-
+
if (k != NULL)
PyMem_DEL(k);
-
+
return result;
}
return (*meth)(self, NULL);
else if (na == 1) {
PyObject *arg = EXT_POP(*pp_stack);
- PyObject *result = (*meth)(self, arg);
+ PyObject *result = (*meth)(self, arg);
Py_DECREF(arg);
return result;
} else {
}
static PyObject *
-fast_function(PyObject *func, PyObject ***pp_stack, int n, int na, int nk)
+fast_function(PyObject *func, PyObject ***pp_stack, int n, int na, int nk)
{
PyObject *co = PyFunction_GET_CODE(func);
PyObject *globals = PyFunction_GET_GLOBALS(func);
d = &PyTuple_GET_ITEM(argdefs, 0);
nd = ((PyTupleObject *)argdefs)->ob_size;
}
- return eval_code2((PyCodeObject *)co, globals,
+ return eval_code2((PyCodeObject *)co, globals,
(PyObject *)NULL, (*pp_stack)-n, na,
(*pp_stack)-2*nk, nk, d, nd);
}
PyObject *key = EXT_POP(*pp_stack);
if (PyDict_GetItem(kwdict, key) != NULL) {
PyObject* fn = ((PyFunctionObject*) func)->func_name;
- PyErr_Format(PyExc_TypeError,
+ PyErr_Format(PyExc_TypeError,
"%.200s%s got multiple values "
"for keyword argument '%.400s'",
fn ? PyString_AsString(fn) : "function",
x = PyLong_AsLong(v);
if (x==-1 && PyErr_Occurred()) {
PyObject *long_zero;
+ int cmp;
- if (!PyErr_ExceptionMatches( PyExc_OverflowError ) ) {
- /* It's not an overflow error, so just
+ if (!PyErr_ExceptionMatches(
+ PyExc_OverflowError)) {
+ /* It's not an overflow error, so just
signal an error */
return 0;
}
- /* It's an overflow error, so we need to
- check the sign of the long integer,
- set the value to INT_MAX or 0, and clear
+ /* Clear the OverflowError */
+ PyErr_Clear();
+
+ /* It's an overflow error, so we need to
+ check the sign of the long integer,
+ set the value to INT_MAX or 0, and clear
the error. */
/* Create a long integer with a value of 0 */
- long_zero = PyLong_FromLong( 0L );
+ long_zero = PyLong_FromLong(0L);
if (long_zero == NULL) return 0;
/* Check sign */
- if (PyObject_Compare(long_zero, v) < 0)
+ cmp = PyObject_RichCompareBool(v, long_zero,
+ Py_GT);
+ Py_DECREF(long_zero);
+ if (cmp < 0)
+ return 0;
+ else if (cmp > 0)
x = INT_MAX;
else
x = 0;
-
- /* Free the long integer we created, and clear the
- OverflowError */
- Py_DECREF(long_zero);
- PyErr_Clear();
}
} else {
PyErr_SetString(PyExc_TypeError,
}
static int
-assign_slice(PyObject *u, PyObject *v, PyObject *w, PyObject *x) /* u[v:w] = x */
+assign_slice(PyObject *u, PyObject *v, PyObject *w, PyObject *x)
+ /* u[v:w] = x */
{
int ilow = 0, ihigh = INT_MAX;
if (!_PyEval_SliceIndex(v, &ilow))
static PyObject *
cmp_outcome(int op, register PyObject *v, register PyObject *w)
{
- register int cmp;
- register int res = 0;
+ int res = 0;
switch (op) {
case IS:
case IS_NOT:
res = PyErr_GivenExceptionMatches(v, w);
break;
default:
- cmp = PyObject_Compare(v, w);
- if (cmp && PyErr_Occurred())
- return NULL;
- switch (op) {
- case LT: res = cmp < 0; break;
- case LE: res = cmp <= 0; break;
- case EQ: res = cmp == 0; break;
- case NE: res = cmp != 0; break;
- case GT: res = cmp > 0; break;
- case GE: res = cmp >= 0; break;
- /* XXX no default? (res is initialized to 0 though) */
- }
+ return PyObject_RichCompare(v, w, op);
}
v = res ? Py_True : Py_False;
Py_INCREF(v);
}
return x;
}
-
+
static int
import_all_from(PyObject *locals, PyObject *v)
{
!PyCode_Check(prog) &&
!PyFile_Check(prog)) {
PyErr_SetString(PyExc_TypeError,
- "exec: arg 1 must be a string, file, or code object");
+ "exec: arg 1 must be a string, file, or code object");
return -1;
}
if (!PyDict_Check(globals)) {
return 0;
}
-static void
+static void
format_exc_check_arg(PyObject *exc, char *format_str, PyObject *obj)
{
char *obj_str;
projects / python / commitdiff