Hmm, missed a few of the Tcl_DoOneEvent removals somehow.

svn:revision:41561
svn:branch:STABLE
svn:account:starseeker

src/librt/primitives/bot/bot.c

@@ -2770,7 +2770,6 @@ rt_bot_vertex_fuse(struct rt_bot_internal *bot)
 		j++;
 	    }
 	}
-	Tcl_DoOneEvent(TCL_DONT_WAIT);
     }
 #else
     /* THE NEW WAY .. possibly O(n) with basic bin sorting */
@@ -3079,8 +3078,6 @@ rt_bot_condense(struct rt_bot_internal *bot)
     i = 0;
     while (i < num_verts-dead_verts) {
 	while (!verts[i] && i < num_verts-dead_verts) {
-	    Tcl_DoOneEvent(TCL_DONT_WAIT);
-
 	    dead_verts++;
 	    for (j=i; j<num_verts-dead_verts; j++) {
 		k = j+1;
@@ -3452,7 +3449,6 @@ rt_bot_sort_faces(struct rt_bot_internal *bot, int tris_per_piece)
 		max_verts--;
 	    }
 	}
-	Tcl_DoOneEvent(TCL_DONT_WAIT);
     }
 
     bu_free(old_faces, "old_faces");
@@ -3807,8 +3803,6 @@ edge_can_be_decimated(struct rt_bot_internal *bot,
 	}
     }
 
-    Tcl_DoOneEvent(TCL_DONT_WAIT);
-
     /* if only one face will be deleted, do not decimate this may be a
      * free edge
      */