Revision: 75608
          http://sourceforge.net/p/brlcad/code/75608
Author:   starseeker
Date:     2020-04-25 19:34:11 +0000 (Sat, 25 Apr 2020)
Log Message:
-----------
Adjust Tcl main loop - was burning full CPU previously...

Modified Paths:
--------------
    brlcad/trunk/src/libdm/tcl_img.cpp

Modified: brlcad/trunk/src/libdm/tcl_img.cpp
===================================================================
--- brlcad/trunk/src/libdm/tcl_img.cpp  2020-04-25 19:26:45 UTC (rev 75607)
+++ brlcad/trunk/src/libdm/tcl_img.cpp  2020-04-25 19:34:11 UTC (rev 75608)
@@ -254,10 +254,7 @@
     // Enter the main applicatio loop - the initial image will appear, and 
Button-1 mouse
     // clicks on the window should generate and display new images
     while (1) {
-       int handled = 0;
-       while (Tcl_DoOneEvent(TCL_ALL_EVENTS|TCL_DONT_WAIT)) {
-            handled++;
-        }
+       Tcl_DoOneEvent(0);
        if (!Tk_GetNumMainWindows()) {
            // If we've closed the window, we're done
            exit(0);

This was sent by the SourceForge.net collaborative development platform, the 
world's largest Open Source development site.



_______________________________________________
BRL-CAD Source Commits mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/brlcad-commits

Reply via email to