python · erlend-aasland · May 14, 2023 · May 13, 2023 · May 13, 2023 · May 13, 2023
diff --git a/Modules/_ctypes/_ctypes.c b/Modules/_ctypes/_ctypes.c
@@ -5476,18 +5476,25 @@ comerror_init(PyObject *self, PyObject *args, PyObject *kwds)
    return 0;
 }

+static int
+comerror_clear(PyObject *self)
+{
+    return ((PyTypeObject *)PyExc_BaseException)->tp_clear(self);
+}
+
 static int
 comerror_traverse(PyObject *self, visitproc visit, void *arg)
 {
    Py_VISIT(Py_TYPE(self));
-    return 0;
+    return ((PyTypeObject *)PyExc_BaseException)->tp_traverse(self, visit, arg);
 }

 static void
 comerror_dealloc(PyObject *self)
 {
    PyTypeObject *tp = Py_TYPE(self);
    PyObject_GC_UnTrack(self);
+    (void)comerror_clear(self);
    tp->tp_free(self);
    Py_DECREF(tp);
 }
@@ -5497,6 +5504,7 @@ static PyType_Slot comerror_slots[] = {
    {Py_tp_init, comerror_init},
    {Py_tp_traverse, comerror_traverse},
    {Py_tp_dealloc, comerror_dealloc},
+    {Py_tp_clear, comerror_clear},
    {0, NULL},
 };