diff --git a/src/python/nwchem_wrap.c b/src/python/nwchem_wrap.c index 94afcce35a..32ce770313 100644 --- a/src/python/nwchem_wrap.c +++ b/src/python/nwchem_wrap.c @@ -83,6 +83,29 @@ extern Integer FATR util_sgroup_numgroups_(void); extern Integer FATR util_sgroup_mygroup_(void); extern Integer FATR util_sgroup_zero_group_(void); +static PyObject *nwwrap_c_ints(int n, int a[]) +{ + PyObject *sObj; + int i; + + if (n == 1) + return PyInteger_FromLong(a[0]); + + if (!(sObj=PyList_New(n))) return NULL; + for(i=0; i