re-introduce stack2tuple (for now)

Author: timfel

graalpython/com.oracle.graal.python.cext/include/Python.h

@@ -159,7 +159,8 @@ extern int _PyArg_ParseTupleAndKeywords_SizeT(PyObject *argv, PyObject *kwds, co
 #define _PyArg_Parse_SizeT(ARGV, FORMAT, ...) PyArg_ParseTupleAndKeywords(ARGV, PyDict_New(), FORMAT, NULL, __VA_ARGS__)
 #define _PyArg_ParseTuple_SizeT(ARGV, FORMAT, ...) PyArg_ParseTupleAndKeywords(ARGV, PyDict_New(), FORMAT, NULL, __VA_ARGS__)
 #define _PyArg_ParseTupleAndKeywordsFast_SizeT(ARGS, KWARGS, PARSER, ...) PyArg_ParseTupleAndKeywords(ARGS, KWARGS, (PARSER)->format, (PARSER)->keywords, __VA_ARGS__)
-#define _PyArg_ParseStack_SizeT(ARGS, NARGS, KWNAMES, PARSER, ...) PyArg_ParseTupleAndKeywords((PyObject*)ARGS, PyDict_New(), (PARSER)->format, (char**)KWNAMES, __VA_ARGS__)
+extern PyObject* PyTruffle_Stack2Tuple(PyObject** args, Py_ssize_t nargs);
+#define _PyArg_ParseStack_SizeT(ARGS, NARGS, KWNAMES, PARSER, ...) PyArg_ParseTupleAndKeywords(PyTruffle_Stack2Tuple(ARGS, NARGS), KWNAMES, (PARSER)->format, (PARSER)->keywords, __VA_ARGS__)
 
 #ifndef PyArg_Parse
 #define PyArg_Parse _PyArg_Parse_SizeT

graalpython/com.oracle.graal.python.cext/src/modsupport.c

@@ -84,6 +84,15 @@ PyObject* PyTruffle_GetArg(positional_argstack* p, PyObject* kwds, char** kwdnam
         break;                                          \
     }
 
+MUST_INLINE PyObject* PyTruffle_Stack2Tuple(PyObject** args, Py_ssize_t nargs) {
+    PyObject* argv = PyTuple_New(nargs);
+    Py_ssize_t i;
+    for (i=0; i < nargs; i++) {
+        PyTuple_SetItem(argv, i, args[i]);
+    }
+    return argv;
+}
+
 /* argparse */
 UPCALL_ID(__bool__);
 int _PyArg_ParseTupleAndKeywords_SizeT(PyObject *argv, PyObject *kwds, const char *format, char** kwdnames, ...) {