add _PyErr_Occurred

Author: lukasstadler

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

@@ -2440,6 +2440,10 @@ PyAPI_FUNC(int) _PyDict_SetItem_KnownHash(PyObject* a, PyObject* b, PyObject* c,
 PyAPI_FUNC(void) _PyErr_BadInternalCall(const char* a, int b) {
     Graal_PyErr_BadInternalCall(truffleString(a), b);
 }
+#undef _PyErr_Occurred
+PyAPI_FUNC(PyObject*) _PyErr_Occurred(PyThreadState* a) {
+    return Graal_PyErr_Occurred(a);
+}
 #undef _PyErr_WriteUnraisableMsg
 PyAPI_FUNC(void) _PyErr_WriteUnraisableMsg(const char* a, PyObject* b) {
     Graal_PyErr_WriteUnraisableMsg(truffleString(a), b);

graalpython/com.oracle.graal.python.cext/src/capi.h

@@ -617,6 +617,7 @@ typedef struct {
     BUILTIN(_PyDict_Pop, PyObject*, PyObject*, PyObject*, PyObject*) \
     BUILTIN(_PyDict_SetItem_KnownHash, int, PyObject*, PyObject*, PyObject*, Py_hash_t) \
     BUILTIN(_PyErr_BadInternalCall, void, const char*, int) \
+    BUILTIN(_PyErr_Occurred, PyObject*, PyThreadState*) \
     BUILTIN(_PyErr_WriteUnraisableMsg, void, const char*, PyObject*) \
     BUILTIN(_PyList_Extend, PyObject*, PyListObject*, PyObject*) \
     BUILTIN(_PyList_SET_ITEM, void, PyObject*, Py_ssize_t, PyObject*) \

graalpython/com.oracle.graal.python.jni/src/capi_forwards.h

@@ -1305,6 +1305,7 @@ void unimplemented(const char* name) {
 #undef _PyErr_FormatFromCause
 #undef _PyErr_GetExcInfo
 #undef _PyErr_GetTopmostException
+#undef _PyErr_Occurred
 #undef _PyErr_ProgramDecodedTextObject
 #undef _PyErr_SetKeyError
 #undef _PyErr_TrySetFromCause
@@ -5009,6 +5010,10 @@ PyAPI_FUNC(void) _PyErr_GetExcInfo(PyThreadState* a, PyObject** b, PyObject** c,
 PyAPI_FUNC(_PyErr_StackItem*) _PyErr_GetTopmostException(PyThreadState* a) {
     unimplemented("_PyErr_GetTopmostException"); exit(-1);
 }
+PyAPI_FUNC(PyObject*) _PyErr_Occurred(PyThreadState* a) {
+    PyObject* result = (PyObject*) Graal_PyErr_Occurred(a);
+    return result;
+}
 PyAPI_FUNC(PyObject*) _PyErr_ProgramDecodedTextObject(PyObject* a, int b, const char* c) {
     unimplemented("_PyErr_ProgramDecodedTextObject"); exit(-1);
 }