Make all Tcl lock operations into macros for easier tracking

Author: native-api

Modules/_tkinter.c

@@ -230,13 +230,25 @@ static PyThreadState *tcl_tstate = NULL;
 #endif
 
 #define ENTER_TCL \
-    { PyThreadState *tstate = PyThreadState_Get(); Py_BEGIN_ALLOW_THREADS \
-        if(tcl_lock)PyThread_acquire_lock(tcl_lock, 1); tcl_tstate = tstate;
+    { PyThreadState *tstate = PyThreadState_Get();\
+        ENTER_TCL_CUSTOM_TSTATE(tstate)
+
+#define ENTER_TCL_CUSTOM_TSTATE(tstate) \
+        Py_BEGIN_ALLOW_THREADS\
+        if (tcl_lock)PyThread_acquire_lock(tcl_lock, 1); tcl_tstate = tstate;
 
 #define LEAVE_TCL \
     tcl_tstate = NULL; \
     if(tcl_lock)PyThread_release_lock(tcl_lock); Py_END_ALLOW_THREADS}
 
+#define LEAVE_TCL_WITH_BUSYWAIT(result) \
+    tcl_tstate = NULL; \
+    if (tcl_lock)PyThread_release_lock(tcl_lock);\
+    if (result == 0)\
+        Sleep(Tkinter_busywaitinterval);\
+    Py_END_ALLOW_THREADS
+
+
 #define ENTER_OVERLAP \
     Py_END_ALLOW_THREADS
 
@@ -2879,15 +2891,9 @@ _tkinter_tkapp_mainloop_impl(TkappObject *self, int threshold)
             LEAVE_TCL
         }
         else {
-            Py_BEGIN_ALLOW_THREADS
-            if(tcl_lock)PyThread_acquire_lock(tcl_lock, 1);
-            tcl_tstate = tstate;
+            ENTER_TCL_CUSTOM_TSTATE(tstate)
             result = Tcl_DoOneEvent(TCL_DONT_WAIT);
-            tcl_tstate = NULL;
-            if(tcl_lock)PyThread_release_lock(tcl_lock);
-            if (result == 0)
-                Sleep(Tkinter_busywaitinterval);
-            Py_END_ALLOW_THREADS
+            LEAVE_TCL_WITH_BUSYWAIT(result)
         }
 
         if (PyErr_CheckSignals() != 0) {
@@ -3345,17 +3351,11 @@ EventHook(void)
             break;
         }
 #endif
-        Py_BEGIN_ALLOW_THREADS
-        if(tcl_lock)PyThread_acquire_lock(tcl_lock, 1);
-        tcl_tstate = event_tstate;
+        ENTER_TCL_CUSTOM_TSTATE(event_tstate)
 
         result = Tcl_DoOneEvent(TCL_DONT_WAIT);
 
-        tcl_tstate = NULL;
-        if(tcl_lock)PyThread_release_lock(tcl_lock);
-        if (result == 0)
-            Sleep(Tkinter_busywaitinterval);
-        Py_END_ALLOW_THREADS
+        LEAVE_TCL_WITH_BUSYWAIT(result)
 
         if (result < 0)
             break;