Gecko [ www.foryou-vip.com ]

Name	Size	Permission	Date
clinic	[ DIR ]	drwxr-xr-x	2024-03-19 22:46
Python-ast.c	403.1 KB	-rw-r--r--	2024-03-19 22:46
Python-ast.gcda	73.55 KB	-rw-r--r--	2025-06-04 09:21
Python-ast.o	1.64 MB	-rw-r--r--	2025-06-04 09:22
README	62 B	-rw-r--r--	2024-03-19 22:46
_warnings.c	37.47 KB	-rw-r--r--	2024-03-19 22:46
_warnings.gcda	10.5 KB	-rw-r--r--	2025-06-04 09:21
_warnings.o	274.36 KB	-rw-r--r--	2025-06-04 09:22
asdl.c	188 B	-rw-r--r--	2024-03-19 22:46
asdl.gcda	3.98 KB	-rw-r--r--	2025-06-04 09:21
asdl.o	41.46 KB	-rw-r--r--	2025-06-04 09:22
ast.c	33.83 KB	-rw-r--r--	2024-03-19 22:46
ast.gcda	8.98 KB	-rw-r--r--	2025-06-04 09:21
ast.o	162 KB	-rw-r--r--	2025-06-04 09:22
ast_opt.c	29.15 KB	-rw-r--r--	2024-03-19 22:46
ast_opt.gcda	10.67 KB	-rw-r--r--	2025-06-04 09:21
ast_opt.o	464.67 KB	-rw-r--r--	2025-06-04 09:22
ast_unparse.c	25.85 KB	-rw-r--r--	2024-03-19 22:46
ast_unparse.gcda	9.81 KB	-rw-r--r--	2025-06-04 09:21
ast_unparse.o	204.5 KB	-rw-r--r--	2025-06-04 09:22
bltinmodule.c	88.5 KB	-rw-r--r--	2024-03-19 22:46
bltinmodule.gcda	17.87 KB	-rw-r--r--	2025-06-04 09:21
bltinmodule.o	611.81 KB	-rw-r--r--	2025-06-04 09:22
bootstrap_hash.c	18.18 KB	-rw-r--r--	2024-03-19 22:46
bootstrap_hash.gcda	4.34 KB	-rw-r--r--	2025-06-04 09:21
bootstrap_hash.o	63.27 KB	-rw-r--r--	2025-06-04 09:22
ceval.c	206.97 KB	-rw-r--r--	2024-03-19 22:46
ceval.gcda	29.57 KB	-rw-r--r--	2025-06-04 09:21
ceval.o	1.21 MB	-rw-r--r--	2025-06-04 09:22
ceval_gil.h	12.19 KB	-rw-r--r--	2024-03-19 22:46
codecs.c	45.02 KB	-rw-r--r--	2024-03-19 22:46
codecs.gcda	12.75 KB	-rw-r--r--	2025-06-04 09:21
codecs.o	329.38 KB	-rw-r--r--	2025-06-04 09:22
compile.c	233.08 KB	-rw-r--r--	2024-03-19 22:46
compile.gcda	43.95 KB	-rw-r--r--	2025-06-04 09:21
compile.o	1.79 MB	-rw-r--r--	2025-06-04 09:22
condvar.h	8.44 KB	-rw-r--r--	2024-03-19 22:46
context.c	30.93 KB	-rw-r--r--	2024-03-19 22:46
context.gcda	9.95 KB	-rw-r--r--	2025-06-04 09:21
context.o	200.97 KB	-rw-r--r--	2025-06-04 09:22
dtoa.c	78.28 KB	-rw-r--r--	2024-03-19 22:46
dtoa.gcda	10.32 KB	-rw-r--r--	2025-06-04 09:21
dtoa.o	658.92 KB	-rw-r--r--	2025-06-04 09:22
dup2.c	759 B	-rw-r--r--	2024-03-19 22:46
dynamic_annotations.c	6.59 KB	-rw-r--r--	2024-03-19 22:46
dynamic_annotations.o	2.16 KB	-rw-r--r--	2025-06-04 09:22
dynload_hpux.c	2.12 KB	-rw-r--r--	2024-03-19 22:46
dynload_shlib.c	3.47 KB	-rw-r--r--	2024-03-19 22:46
dynload_shlib.gcda	3.77 KB	-rw-r--r--	2025-06-04 09:21
dynload_shlib.o	78.03 KB	-rw-r--r--	2025-06-04 09:22
dynload_stub.c	186 B	-rw-r--r--	2024-03-19 22:46
dynload_win.c	9.97 KB	-rw-r--r--	2024-03-19 22:46
errors.c	49.3 KB	-rw-r--r--	2024-03-19 22:46
errors.gcda	11.97 KB	-rw-r--r--	2025-06-04 09:21
errors.o	604.46 KB	-rw-r--r--	2025-06-04 09:22
fileutils.c	65.03 KB	-rw-r--r--	2024-03-19 22:46
fileutils.gcda	9.9 KB	-rw-r--r--	2025-06-04 09:21
fileutils.o	235.27 KB	-rw-r--r--	2025-06-04 09:22
formatter_unicode.c	50.35 KB	-rw-r--r--	2024-03-19 22:46
formatter_unicode.gcda	7.99 KB	-rw-r--r--	2025-06-04 09:21
formatter_unicode.o	352.49 KB	-rw-r--r--	2025-06-04 09:22
frozen.c	1.31 KB	-rw-r--r--	2024-03-19 22:46
frozen.o	122.48 KB	-rw-r--r--	2025-06-04 09:22
frozen_hello.h	547 B	-rw-r--r--	2024-03-19 22:46
frozenmain.c	3.12 KB	-rw-r--r--	2024-03-19 22:46
frozenmain.o	55.7 KB	-rw-r--r--	2025-06-04 09:22
future.c	4.35 KB	-rw-r--r--	2024-03-19 22:46
future.gcda	3.91 KB	-rw-r--r--	2025-06-04 09:21
future.o	69.3 KB	-rw-r--r--	2025-06-04 09:22
getargs.c	83.81 KB	-rw-r--r--	2024-03-19 22:46
getargs.gcda	14.68 KB	-rw-r--r--	2025-06-04 09:21
getargs.o	702.23 KB	-rw-r--r--	2025-06-04 09:22
getcompiler.c	534 B	-rw-r--r--	2024-03-19 22:46
getcompiler.gcda	3.48 KB	-rw-r--r--	2025-06-04 09:21
getcompiler.o	31.86 KB	-rw-r--r--	2025-06-04 09:22
getcopyright.c	511 B	-rw-r--r--	2024-03-19 22:46
getcopyright.gcda	3.48 KB	-rw-r--r--	2025-06-04 09:21
getcopyright.o	32.27 KB	-rw-r--r--	2025-06-04 09:22
getopt.c	4.6 KB	-rw-r--r--	2024-03-19 22:46
getopt.gcda	3.82 KB	-rw-r--r--	2025-06-04 09:21
getopt.o	43.34 KB	-rw-r--r--	2025-06-04 09:22
getplatform.c	133 B	-rw-r--r--	2024-03-19 22:46
getplatform.gcda	3.48 KB	-rw-r--r--	2025-06-04 09:21
getplatform.o	31.85 KB	-rw-r--r--	2025-06-04 09:22
getversion.c	308 B	-rw-r--r--	2024-03-19 22:46
getversion.gcda	3.5 KB	-rw-r--r--	2025-06-04 09:21
getversion.o	32.93 KB	-rw-r--r--	2025-06-04 09:22
hamt.c	78.82 KB	-rw-r--r--	2024-03-19 22:46
hamt.gcda	11.18 KB	-rw-r--r--	2025-06-04 09:21
hamt.o	257.84 KB	-rw-r--r--	2025-06-04 09:22
hashtable.c	11.17 KB	-rw-r--r--	2024-03-19 22:46
hashtable.gcda	5.66 KB	-rw-r--r--	2025-06-04 09:21
hashtable.o	84.36 KB	-rw-r--r--	2025-06-04 09:22
import.c	62.01 KB	-rw-r--r--	2024-03-19 22:46
import.gcda	17.11 KB	-rw-r--r--	2025-06-04 09:21
import.o	461.4 KB	-rw-r--r--	2025-06-04 09:22
importdl.c	7.32 KB	-rw-r--r--	2024-03-19 22:46
importdl.gcda	4.35 KB	-rw-r--r--	2025-06-04 09:21
importdl.h	487 B	-rw-r--r--	2024-03-19 22:46
importdl.o	71.44 KB	-rw-r--r--	2025-06-04 09:22
importlib.h	99.12 KB	-rw-r--r--	2024-03-19 22:46
importlib_external.h	147.15 KB	-rw-r--r--	2024-03-19 22:46
importlib_zipimport.h	57.35 KB	-rw-r--r--	2024-03-19 22:46
initconfig.c	89.33 KB	-rw-r--r--	2024-03-19 22:46
initconfig.gcda	20.45 KB	-rw-r--r--	2025-06-04 09:21
initconfig.o	482.04 KB	-rw-r--r--	2025-06-04 09:22
makeopcodetargets.py	1.55 KB	-rwxr-xr-x	2024-03-19 22:46
marshal.c	48.33 KB	-rw-r--r--	2024-03-19 22:46
marshal.gcda	13.91 KB	-rw-r--r--	2025-06-04 09:21
marshal.o	325.08 KB	-rw-r--r--	2025-06-04 09:22
modsupport.c	18.12 KB	-rw-r--r--	2024-03-19 22:46
modsupport.gcda	6.66 KB	-rw-r--r--	2025-06-04 09:21
modsupport.o	243.86 KB	-rw-r--r--	2025-06-04 09:22
mysnprintf.c	2.49 KB	-rw-r--r--	2024-03-19 22:46
mysnprintf.gcda	3.56 KB	-rw-r--r--	2025-06-04 09:21
mysnprintf.o	39.3 KB	-rw-r--r--	2025-06-04 09:22
mystrtoul.c	8.09 KB	-rw-r--r--	2024-03-19 22:46
mystrtoul.gcda	3.93 KB	-rw-r--r--	2025-06-04 09:21
mystrtoul.o	64.22 KB	-rw-r--r--	2025-06-04 09:22
opcode_targets.h	6.31 KB	-rw-r--r--	2024-03-19 22:46
pathconfig.c	19.75 KB	-rw-r--r--	2024-03-19 22:46
pathconfig.gcda	7.42 KB	-rw-r--r--	2025-06-04 09:21
pathconfig.o	110.59 KB	-rw-r--r--	2025-06-04 09:22
preconfig.c	25.21 KB	-rw-r--r--	2024-03-19 22:46
preconfig.gcda	6.76 KB	-rw-r--r--	2025-06-04 09:21
preconfig.o	140.21 KB	-rw-r--r--	2025-06-04 09:22
pyarena.c	5.52 KB	-rw-r--r--	2024-03-19 22:46
pyarena.gcda	3.97 KB	-rw-r--r--	2025-06-04 09:21
pyarena.o	48.03 KB	-rw-r--r--	2025-06-04 09:22
pyctype.c	7.73 KB	-rw-r--r--	2024-03-19 22:46
pyctype.o	32.77 KB	-rw-r--r--	2025-06-04 09:22
pyfpe.c	345 B	-rw-r--r--	2024-03-19 22:46
pyfpe.o	4.01 KB	-rw-r--r--	2025-06-04 09:22
pyhash.c	13.45 KB	-rw-r--r--	2024-03-19 22:46
pyhash.gcda	4.16 KB	-rw-r--r--	2025-06-04 09:21
pyhash.o	70.6 KB	-rw-r--r--	2025-06-04 09:22
pylifecycle.c	80.77 KB	-rw-r--r--	2024-03-19 22:46
pylifecycle.gcda	15.06 KB	-rw-r--r--	2025-06-04 09:21
pylifecycle.o	390.44 KB	-rw-r--r--	2025-06-04 09:22
pymath.c	1.6 KB	-rw-r--r--	2024-03-19 22:46
pymath.gcda	3.54 KB	-rw-r--r--	2025-06-04 09:21
pymath.o	32.34 KB	-rw-r--r--	2025-06-04 09:22
pystate.c	56.36 KB	-rw-r--r--	2024-03-19 22:46
pystate.gcda	12.61 KB	-rw-r--r--	2025-06-04 09:21
pystate.o	238.3 KB	-rw-r--r--	2025-06-04 09:22
pystrcmp.c	753 B	-rw-r--r--	2024-03-19 22:46
pystrcmp.gcda	3.62 KB	-rw-r--r--	2025-06-04 09:21
pystrcmp.o	37.12 KB	-rw-r--r--	2025-06-04 09:22
pystrhex.c	5.24 KB	-rw-r--r--	2024-03-19 22:46
pystrhex.gcda	4.09 KB	-rw-r--r--	2025-06-04 09:21
pystrhex.o	55.29 KB	-rw-r--r--	2025-06-04 09:22
pystrtod.c	40.06 KB	-rw-r--r--	2024-03-19 22:46
pystrtod.gcda	5.14 KB	-rw-r--r--	2025-06-04 09:21
pystrtod.o	96.01 KB	-rw-r--r--	2025-06-04 09:22
pythonrun.c	42.71 KB	-rw-r--r--	2024-03-19 22:46
pythonrun.gcda	11.89 KB	-rw-r--r--	2025-06-04 09:21
pythonrun.o	282.42 KB	-rw-r--r--	2025-06-04 09:22
pytime.c	28.68 KB	-rw-r--r--	2024-03-19 22:46
pytime.gcda	7.47 KB	-rw-r--r--	2025-06-04 09:21
pytime.o	120.86 KB	-rw-r--r--	2025-06-04 09:22
stdlib_module_names.h	3.49 KB	-rw-r--r--	2024-03-19 22:46
structmember.c	8.83 KB	-rw-r--r--	2024-03-19 22:46
structmember.gcda	4.83 KB	-rw-r--r--	2025-06-04 09:21
structmember.o	73.16 KB	-rw-r--r--	2025-06-04 09:22
suggestions.c	8.46 KB	-rw-r--r--	2024-03-19 22:46
suggestions.gcda	4.29 KB	-rw-r--r--	2025-06-04 09:21
suggestions.o	57.27 KB	-rw-r--r--	2025-06-04 09:22
symtable.c	72.25 KB	-rw-r--r--	2024-03-19 22:46
symtable.gcda	15.05 KB	-rw-r--r--	2025-06-04 09:21
symtable.o	638.03 KB	-rw-r--r--	2025-06-04 09:22
sysmodule.c	94.57 KB	-rw-r--r--	2024-03-19 22:46
sysmodule.gcda	19.89 KB	-rw-r--r--	2025-06-04 09:21
sysmodule.o	579.73 KB	-rw-r--r--	2025-06-04 09:22
thread.c	5.8 KB	-rw-r--r--	2024-03-19 22:46
thread.gcda	6.58 KB	-rw-r--r--	2025-06-04 09:21
thread.o	133.44 KB	-rw-r--r--	2025-06-04 09:22
thread_nt.h	12.16 KB	-rw-r--r--	2024-03-19 22:46
thread_pthread.h	25.32 KB	-rw-r--r--	2024-03-19 22:46
traceback.c	25.55 KB	-rw-r--r--	2024-03-19 22:46
traceback.gcda	8.3 KB	-rw-r--r--	2025-06-04 09:21
traceback.o	169.99 KB	-rw-r--r--	2025-06-04 09:22
wordcode_helpers.h	1.25 KB	-rw-r--r--	2024-03-19 22:46

Rename

/* Module support implementation */

#include "Python.h"
#include "pycore_abstract.h"   // _PyIndex_Check()

#define FLAG_SIZE_T 1
typedef double va_double;

static PyObject *va_build_value(const char *, va_list, int);
static PyObject **va_build_stack(PyObject **small_stack, Py_ssize_t small_stack_len, const char *, va_list, int, Py_ssize_t*);

/* Package context -- the full module name for package imports */
const char *_Py_PackageContext = NULL;

int
_Py_convert_optional_to_ssize_t(PyObject *obj, void *result)
{
    Py_ssize_t limit;
    if (obj == Py_None) {
        return 1;
    }
    else if (_PyIndex_Check(obj)) {
        limit = PyNumber_AsSsize_t(obj, PyExc_OverflowError);
        if (limit == -1 && PyErr_Occurred()) {
            return 0;
        }
    }
    else {
        PyErr_Format(PyExc_TypeError,
                     "argument should be integer or None, not '%.200s'",
                     Py_TYPE(obj)->tp_name);
        return 0;
    }
    *((Py_ssize_t *)result) = limit;
    return 1;
}

/* Helper for mkvalue() to scan the length of a format */

static Py_ssize_t
countformat(const char *format, char endchar)
{
    Py_ssize_t count = 0;
    int level = 0;
    while (level > 0 || *format != endchar) {
        switch (*format) {
        case '\0':
            /* Premature end */
            PyErr_SetString(PyExc_SystemError,
                            "unmatched paren in format");
            return -1;
        case '(':
        case '[':
        case '{':
            if (level == 0) {
                count++;
            }
            level++;
            break;
        case ')':
        case ']':
        case '}':
            level--;
            break;
        case '#':
        case '&':
        case ',':
        case ':':
        case ' ':
        case '\t':
            break;
        default:
            if (level == 0) {
                count++;
            }
        }
        format++;
    }
    return count;
}

/* Generic function to create a value -- the inverse of getargs() */
/* After an original idea and first implementation by Steven Miale */

static PyObject *do_mktuple(const char**, va_list *, char, Py_ssize_t, int);
static int do_mkstack(PyObject **, const char**, va_list *, char, Py_ssize_t, int);
static PyObject *do_mklist(const char**, va_list *, char, Py_ssize_t, int);
static PyObject *do_mkdict(const char**, va_list *, char, Py_ssize_t, int);
static PyObject *do_mkvalue(const char**, va_list *, int);

static void
do_ignore(const char **p_format, va_list *p_va, char endchar, Py_ssize_t n, int flags)
{
    PyObject *v;
    Py_ssize_t i;
    assert(PyErr_Occurred());
    v = PyTuple_New(n);
    for (i = 0; i < n; i++) {
        PyObject *exception, *value, *tb, *w;

PyErr_Fetch(&exception, &value, &tb);
        w = do_mkvalue(p_format, p_va, flags);
        PyErr_Restore(exception, value, tb);
        if (w != NULL) {
            if (v != NULL) {
                PyTuple_SET_ITEM(v, i, w);
            }
            else {
                Py_DECREF(w);
            }
        }
    }
    Py_XDECREF(v);
    if (**p_format != endchar) {
        PyErr_SetString(PyExc_SystemError,
                        "Unmatched paren in format");
        return;
    }
    if (endchar) {
        ++*p_format;
    }
}

static PyObject *
do_mkdict(const char **p_format, va_list *p_va, char endchar, Py_ssize_t n, int flags)
{
    PyObject *d;
    Py_ssize_t i;
    if (n < 0)
        return NULL;
    if (n % 2) {
        PyErr_SetString(PyExc_SystemError,
                        "Bad dict format");
        do_ignore(p_format, p_va, endchar, n, flags);
        return NULL;
    }
    /* Note that we can't bail immediately on error as this will leak
       refcounts on any 'N' arguments. */
    if ((d = PyDict_New()) == NULL) {
        do_ignore(p_format, p_va, endchar, n, flags);
        return NULL;
    }
    for (i = 0; i < n; i+= 2) {
        PyObject *k, *v;

k = do_mkvalue(p_format, p_va, flags);
        if (k == NULL) {
            do_ignore(p_format, p_va, endchar, n - i - 1, flags);
            Py_DECREF(d);
            return NULL;
        }
        v = do_mkvalue(p_format, p_va, flags);
        if (v == NULL || PyDict_SetItem(d, k, v) < 0) {
            do_ignore(p_format, p_va, endchar, n - i - 2, flags);
            Py_DECREF(k);
            Py_XDECREF(v);
            Py_DECREF(d);
            return NULL;
        }
        Py_DECREF(k);
        Py_DECREF(v);
    }
    if (**p_format != endchar) {
        Py_DECREF(d);
        PyErr_SetString(PyExc_SystemError,
                        "Unmatched paren in format");
        return NULL;
    }
    if (endchar)
        ++*p_format;
    return d;
}

static PyObject *
do_mklist(const char **p_format, va_list *p_va, char endchar, Py_ssize_t n, int flags)
{
    PyObject *v;
    Py_ssize_t i;
    if (n < 0)
        return NULL;
    /* Note that we can't bail immediately on error as this will leak
       refcounts on any 'N' arguments. */
    v = PyList_New(n);
    if (v == NULL) {
        do_ignore(p_format, p_va, endchar, n, flags);
        return NULL;
    }
    for (i = 0; i < n; i++) {
        PyObject *w = do_mkvalue(p_format, p_va, flags);
        if (w == NULL) {
            do_ignore(p_format, p_va, endchar, n - i - 1, flags);
            Py_DECREF(v);
            return NULL;
        }
        PyList_SET_ITEM(v, i, w);
    }
    if (**p_format != endchar) {
        Py_DECREF(v);
        PyErr_SetString(PyExc_SystemError,
                        "Unmatched paren in format");
        return NULL;
    }
    if (endchar)
        ++*p_format;
    return v;
}

static int
do_mkstack(PyObject **stack, const char **p_format, va_list *p_va,
           char endchar, Py_ssize_t n, int flags)
{
    Py_ssize_t i;

if (n < 0) {
        return -1;
    }
    /* Note that we can't bail immediately on error as this will leak
       refcounts on any 'N' arguments. */
    for (i = 0; i < n; i++) {
        PyObject *w = do_mkvalue(p_format, p_va, flags);
        if (w == NULL) {
            do_ignore(p_format, p_va, endchar, n - i - 1, flags);
            goto error;
        }
        stack[i] = w;
    }
    if (**p_format != endchar) {
        PyErr_SetString(PyExc_SystemError,
                        "Unmatched paren in format");
        goto error;
    }
    if (endchar) {
        ++*p_format;
    }
    return 0;

error:
    n = i;
    for (i=0; i < n; i++) {
        Py_DECREF(stack[i]);
    }
    return -1;
}

static PyObject *
do_mktuple(const char **p_format, va_list *p_va, char endchar, Py_ssize_t n, int flags)
{
    PyObject *v;
    Py_ssize_t i;
    if (n < 0)
        return NULL;
    /* Note that we can't bail immediately on error as this will leak
       refcounts on any 'N' arguments. */
    if ((v = PyTuple_New(n)) == NULL) {
        do_ignore(p_format, p_va, endchar, n, flags);
        return NULL;
    }
    for (i = 0; i < n; i++) {
        PyObject *w = do_mkvalue(p_format, p_va, flags);
        if (w == NULL) {
            do_ignore(p_format, p_va, endchar, n - i - 1, flags);
            Py_DECREF(v);
            return NULL;
        }
        PyTuple_SET_ITEM(v, i, w);
    }
    if (**p_format != endchar) {
        Py_DECREF(v);
        PyErr_SetString(PyExc_SystemError,
                        "Unmatched paren in format");
        return NULL;
    }
    if (endchar)
        ++*p_format;
    return v;
}

static PyObject *
do_mkvalue(const char **p_format, va_list *p_va, int flags)
{
#define ERROR_NEED_PY_SSIZE_T_CLEAN \
    { \
        PyErr_SetString(PyExc_SystemError, \
                        "PY_SSIZE_T_CLEAN macro must be defined for '#' formats"); \
        return NULL; \
    }

for (;;) {
        switch (*(*p_format)++) {
        case '(':
            return do_mktuple(p_format, p_va, ')',
                              countformat(*p_format, ')'), flags);

case '[':
            return do_mklist(p_format, p_va, ']',
                             countformat(*p_format, ']'), flags);

case '{':
            return do_mkdict(p_format, p_va, '}',
                             countformat(*p_format, '}'), flags);

case 'b':
        case 'B':
        case 'h':
        case 'i':
            return PyLong_FromLong((long)va_arg(*p_va, int));

case 'H':
            return PyLong_FromLong((long)va_arg(*p_va, unsigned int));

case 'I':
        {
            unsigned int n;
            n = va_arg(*p_va, unsigned int);
            return PyLong_FromUnsignedLong(n);
        }

case 'n':
#if SIZEOF_SIZE_T!=SIZEOF_LONG
            return PyLong_FromSsize_t(va_arg(*p_va, Py_ssize_t));
#endif
            /* Fall through from 'n' to 'l' if Py_ssize_t is long */
        case 'l':
            return PyLong_FromLong(va_arg(*p_va, long));

case 'k':
        {
            unsigned long n;
            n = va_arg(*p_va, unsigned long);
            return PyLong_FromUnsignedLong(n);
        }

case 'L':
            return PyLong_FromLongLong((long long)va_arg(*p_va, long long));

case 'K':
            return PyLong_FromUnsignedLongLong((long long)va_arg(*p_va, unsigned long long));

case 'u':
        {
            PyObject *v;
            Py_UNICODE *u = va_arg(*p_va, Py_UNICODE *);
            Py_ssize_t n;
            if (**p_format == '#') {
                ++*p_format;
                if (flags & FLAG_SIZE_T) {
                    n = va_arg(*p_va, Py_ssize_t);
                }
                else {
                    n = va_arg(*p_va, int);
                    ERROR_NEED_PY_SSIZE_T_CLEAN;
                }
            }
            else
                n = -1;
            if (u == NULL) {
                v = Py_None;
                Py_INCREF(v);
            }
            else {
                if (n < 0)
                    n = wcslen(u);
                v = PyUnicode_FromWideChar(u, n);
            }
            return v;
        }
        case 'f':
        case 'd':
            return PyFloat_FromDouble(
                (double)va_arg(*p_va, va_double));

case 'D':
            return PyComplex_FromCComplex(
                *((Py_complex *)va_arg(*p_va, Py_complex *)));

case 'c':
        {
            char p[1];
            p[0] = (char)va_arg(*p_va, int);
            return PyBytes_FromStringAndSize(p, 1);
        }
        case 'C':
        {
            int i = va_arg(*p_va, int);
            return PyUnicode_FromOrdinal(i);
        }

case 's':
        case 'z':
        case 'U':   /* XXX deprecated alias */
        {
            PyObject *v;
            const char *str = va_arg(*p_va, const char *);
            Py_ssize_t n;
            if (**p_format == '#') {
                ++*p_format;
                if (flags & FLAG_SIZE_T) {
                    n = va_arg(*p_va, Py_ssize_t);
                }
                else {
                    n = va_arg(*p_va, int);
                    ERROR_NEED_PY_SSIZE_T_CLEAN;
                }
            }
            else
                n = -1;
            if (str == NULL) {
                v = Py_None;
                Py_INCREF(v);
            }
            else {
                if (n < 0) {
                    size_t m = strlen(str);
                    if (m > PY_SSIZE_T_MAX) {
                        PyErr_SetString(PyExc_OverflowError,
                            "string too long for Python string");
                        return NULL;
                    }
                    n = (Py_ssize_t)m;
                }
                v = PyUnicode_FromStringAndSize(str, n);
            }
            return v;
        }

case 'y':
        {
            PyObject *v;
            const char *str = va_arg(*p_va, const char *);
            Py_ssize_t n;
            if (**p_format == '#') {
                ++*p_format;
                if (flags & FLAG_SIZE_T) {
                    n = va_arg(*p_va, Py_ssize_t);
                }
                else {
                    n = va_arg(*p_va, int);
                    ERROR_NEED_PY_SSIZE_T_CLEAN;
                }
            }
            else
                n = -1;
            if (str == NULL) {
                v = Py_None;
                Py_INCREF(v);
            }
            else {
                if (n < 0) {
                    size_t m = strlen(str);
                    if (m > PY_SSIZE_T_MAX) {
                        PyErr_SetString(PyExc_OverflowError,
                            "string too long for Python bytes");
                        return NULL;
                    }
                    n = (Py_ssize_t)m;
                }
                v = PyBytes_FromStringAndSize(str, n);
            }
            return v;
        }

case 'N':
        case 'S':
        case 'O':
        if (**p_format == '&') {
            typedef PyObject *(*converter)(void *);
            converter func = va_arg(*p_va, converter);
            void *arg = va_arg(*p_va, void *);
            ++*p_format;
            return (*func)(arg);
        }
        else {
            PyObject *v;
            v = va_arg(*p_va, PyObject *);
            if (v != NULL) {
                if (*(*p_format - 1) != 'N')
                    Py_INCREF(v);
            }
            else if (!PyErr_Occurred())
                /* If a NULL was passed
                 * because a call that should
                 * have constructed a value
                 * failed, that's OK, and we
                 * pass the error on; but if
                 * no error occurred it's not
                 * clear that the caller knew
                 * what she was doing. */
                PyErr_SetString(PyExc_SystemError,
                    "NULL object passed to Py_BuildValue");
            return v;
        }

case ':':
        case ',':
        case ' ':
        case '\t':
            break;

default:
            PyErr_SetString(PyExc_SystemError,
                "bad format char passed to Py_BuildValue");
            return NULL;

}
    }

#undef ERROR_NEED_PY_SSIZE_T_CLEAN
}

PyObject *
Py_BuildValue(const char *format, ...)
{
    va_list va;
    PyObject* retval;
    va_start(va, format);
    retval = va_build_value(format, va, 0);
    va_end(va);
    return retval;
}

PyObject *
_Py_BuildValue_SizeT(const char *format, ...)
{
    va_list va;
    PyObject* retval;
    va_start(va, format);
    retval = va_build_value(format, va, FLAG_SIZE_T);
    va_end(va);
    return retval;
}

PyObject *
Py_VaBuildValue(const char *format, va_list va)
{
    return va_build_value(format, va, 0);
}

PyObject *
_Py_VaBuildValue_SizeT(const char *format, va_list va)
{
    return va_build_value(format, va, FLAG_SIZE_T);
}

static PyObject *
va_build_value(const char *format, va_list va, int flags)
{
    const char *f = format;
    Py_ssize_t n = countformat(f, '\0');
    va_list lva;
    PyObject *retval;

if (n < 0)
        return NULL;
    if (n == 0) {
        Py_RETURN_NONE;
    }
    va_copy(lva, va);
    if (n == 1) {
        retval = do_mkvalue(&f, &lva, flags);
    } else {
        retval = do_mktuple(&f, &lva, '\0', n, flags);
    }
    va_end(lva);
    return retval;
}

PyObject **
_Py_VaBuildStack(PyObject **small_stack, Py_ssize_t small_stack_len,
                const char *format, va_list va, Py_ssize_t *p_nargs)
{
    return va_build_stack(small_stack, small_stack_len, format, va, 0, p_nargs);
}

PyObject **
_Py_VaBuildStack_SizeT(PyObject **small_stack, Py_ssize_t small_stack_len,
                       const char *format, va_list va, Py_ssize_t *p_nargs)
{
    return va_build_stack(small_stack, small_stack_len, format, va, FLAG_SIZE_T, p_nargs);
}

static PyObject **
va_build_stack(PyObject **small_stack, Py_ssize_t small_stack_len,
               const char *format, va_list va, int flags, Py_ssize_t *p_nargs)
{
    const char *f;
    Py_ssize_t n;
    va_list lva;
    PyObject **stack;
    int res;

n = countformat(format, '\0');
    if (n < 0) {
        *p_nargs = 0;
        return NULL;
    }

if (n == 0) {
        *p_nargs = 0;
        return small_stack;
    }

if (n <= small_stack_len) {
        stack = small_stack;
    }
    else {
        stack = PyMem_Malloc(n * sizeof(stack[0]));
        if (stack == NULL) {
            PyErr_NoMemory();
            return NULL;
        }
    }

va_copy(lva, va);
    f = format;
    res = do_mkstack(stack, &f, &lva, '\0', n, flags);
    va_end(lva);

if (res < 0) {
        if (stack != small_stack) {
            PyMem_Free(stack);
        }
        return NULL;
    }

*p_nargs = n;
    return stack;
}

int
PyModule_AddObjectRef(PyObject *mod, const char *name, PyObject *value)
{
    if (!PyModule_Check(mod)) {
        PyErr_SetString(PyExc_TypeError,
                        "PyModule_AddObjectRef() first argument "
                        "must be a module");
        return -1;
    }
    if (!value) {
        if (!PyErr_Occurred()) {
            PyErr_SetString(PyExc_SystemError,
                            "PyModule_AddObjectRef() must be called "
                            "with an exception raised if value is NULL");
        }
        return -1;
    }

PyObject *dict = PyModule_GetDict(mod);
    if (dict == NULL) {
        /* Internal error -- modules must have a dict! */
        PyErr_Format(PyExc_SystemError, "module '%s' has no __dict__",
                     PyModule_GetName(mod));
        return -1;
    }

if (PyDict_SetItemString(dict, name, value)) {
        return -1;
    }
    return 0;
}

int
PyModule_AddObject(PyObject *mod, const char *name, PyObject *value)
{
    int res = PyModule_AddObjectRef(mod, name, value);
    if (res == 0) {
        Py_DECREF(value);
    }
    return res;
}

int
PyModule_AddIntConstant(PyObject *m, const char *name, long value)
{
    PyObject *obj = PyLong_FromLong(value);
    if (!obj) {
        return -1;
    }
    int res = PyModule_AddObjectRef(m, name, obj);
    Py_DECREF(obj);
    return res;
}

int
PyModule_AddStringConstant(PyObject *m, const char *name, const char *value)
{
    PyObject *obj = PyUnicode_FromString(value);
    if (!obj) {
        return -1;
    }
    int res = PyModule_AddObjectRef(m, name, obj);
    Py_DECREF(obj);
    return res;
}

int
PyModule_AddType(PyObject *module, PyTypeObject *type)
{
    if (PyType_Ready(type) < 0) {
        return -1;
    }

const char *name = _PyType_Name(type);
    assert(name != NULL);

return PyModule_AddObjectRef(module, name, (PyObject *)type);
}