Cython を使用せずに Python C 拡張機能を作成しています。
Cでdouble配列を割り当て、それを内部関数(たまたまFortranにある)で使用して返したいと思います。C-Fortran インターフェースが C で完全に機能することを指摘します。
static PyObject *
Py_drecur(PyObject *self, PyObject *args)
{
// INPUT
int n;
int ipoly;
double al;
double be;
if (!PyArg_ParseTuple(args, "iidd", &n, &ipoly, &al, &be))
return NULL;
// OUTPUT
int nd = 1;
npy_intp dims[] = {n};
double a[n];
double b[n];
int ierr;
drecur_(n, ipoly, al, be, a, b, ierr);
// Create PyArray
PyObject* alpha = PyArray_SimpleNewFromData(nd, dims, NPY_DOUBLE, a);
PyObject* beta = PyArray_SimpleNewFromData(nd, dims, NPY_DOUBLE, b);
Py_INCREF(alpha);
Py_INCREF(beta);
return Py_BuildValue("OO", alpha, beta);
}
このコードをデバッグしたところ、a からアルファを作成しようとするとセグメンテーション エラーが発生しました。そこまではすべて正常に動作します。関数 drecur_ が機能し、削除すると同じ問題が発生します。
では、C データの周りに PyArray を定義する標準的な方法は何ですか? ドキュメントは見つかりましたが、良い例はありません。また、メモリリークはどうですか?alpha と beta のインスタンスが保持されるように、戻る前に INCREF するのは正しいですか? それらが不要になったときの解放はどうですか?
編集NumPy cookbook にあるアプローチで、最終的に正しくなりました。
static PyObject *
Py_drecur(PyObject *self, PyObject *args)
{
// INPUT
int n;
int ipoly;
double al;
double be;
double *a, *b;
PyArrayObject *alpha, *beta;
if (!PyArg_ParseTuple(args, "iidd", &n, &ipoly, &al, &be))
return NULL;
// OUTPUT
int nd = 1;
int dims[2];
dims[0] = n;
alpha = (PyArrayObject*) PyArray_FromDims(nd, dims, NPY_DOUBLE);
beta = (PyArrayObject*) PyArray_FromDims(nd, dims, NPY_DOUBLE);
a = pyvector_to_Carrayptrs(alpha);
b = pyvector_to_Carrayptrs(beta);
int ierr;
drecur_(n, ipoly, al, be, a, b, ierr);
return Py_BuildValue("OO", alpha, beta);
}
double *pyvector_to_Carrayptrs(PyArrayObject *arrayin) {
int n=arrayin->dimensions[0];
return (double *) arrayin->data; /* pointer to arrayin data as double */
}
これについて自由にコメントしてください。回答に感謝します。