Attachment 703527 Details for Bug 857875 – a script exercising python-to-C int/long conversions V2

a script exercising python-to-C int/long conversions V2

pnum.c (text/plain), 1.49 KB, created by Kamil Dudka on 2013-02-27 16:13:25 UTC

(hide)

Description:

Filename:

MIME Type:

Creator: Kamil Dudka

Created: 2013-02-27 16:13:25 UTC

Size: 1.49 KB

patch

obsolete

>#if 0
>gcc "$0" $(python-config --cflags) $(python-config --ldflags) -shared -fPIC -o pnum.so || exit $?
>echo
>python -c '
>import pnum
>import sys
>def chk(x):
>    print(x)
>    return pnum.xxx(x)
>
>chk(None)
>chk(0)
>chk(-1)
>i = 1
>while chk(i):
>    i = i * 0x100
>'
>exit $?
>#endif
>#include <Python.h>
>#include <stdio.h>
>
>PyObject* xxx(PyObject *self, PyObject *args)
>{
>    PyObject *obj;
>    PyArg_ParseTuple(args, "O", &obj);
>    if (PyErr_Occurred()) {
>        PyErr_Print();
>        Py_INCREF(Py_False);
>        return Py_False;
>    }
>
>    printf("PyLong_Check()  = %d\n", PyLong_Check(obj));
>#if PY_MAJOR_VERSION < 3
>    printf("PyInt_Check()   = %d\n", PyInt_Check(obj));
>
>    const long li = PyInt_AsLong(obj);
>    printf("PyInt_AsLong()  = 0x%lx ", li);
>    if (PyErr_Occurred())
>        PyErr_Print();
>    else
>        puts("");
>#endif
>
>    const long ll = PyLong_AsLong(obj);
>    printf("PyLong_AsLong() = 0x%lx ", ll);
>    if (PyErr_Occurred()) {
>        PyErr_Print();
>        puts("");
>        Py_INCREF(Py_False);
>        return Py_False;
>    }
>    else {
>        puts("\n");
>        Py_INCREF(Py_True);
>        return Py_True;
>    }
>}
>
>PyMethodDef pnum_methods[] = {
>    {"xxx", xxx, METH_VARARGS},
>    {NULL, NULL},
>};
>
>#if PY_MAJOR_VERSION < 3
>void initpnum()
>{
>    (void)Py_InitModule("pnum", pnum_methods);
>}
>#else
>static PyModuleDef pnum_mod = {
>    PyModuleDef_HEAD_INIT, "pnum", "", -1,
>    pnum_methods, NULL, NULL, NULL, NULL
>};
>
>PyMODINIT_FUNC PyInit_pnum(void)
>{
>    PyModule_Create(&pnum_mod);
>}
>#endif

Actions: View

Attachments on bug 857875: 613627 | 658097 | 703018 | 703490 | 703505 | 703527 | 705949