From fbcd7cccc5539a2c162b11f4c802b3914d48401e Mon Sep 17 00:00:00 2001
From: dkf <donal.k.fellows@manchester.ac.uk>
Date: Tue, 4 May 2004 13:27:26 +0000
Subject: Remove accidental check-in of TIP#143 code.  D'oh!

---
 generic/tclEvent.c | 8 +-------
 1 file changed, 1 insertion(+), 7 deletions(-)

diff --git a/generic/tclEvent.c b/generic/tclEvent.c
index 4ebdb9f..029d297 100644
--- a/generic/tclEvent.c
+++ b/generic/tclEvent.c
@@ -11,7 +11,7 @@
  * See the file "license.terms" for information on usage and redistribution
  * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * RCS: @(#) $Id: tclEvent.c,v 1.35 2004/05/04 12:36:22 dkf Exp $
+ * RCS: @(#) $Id: tclEvent.c,v 1.36 2004/05/04 13:27:26 dkf Exp $
  */
 
 #include "tclInt.h"
@@ -1114,9 +1114,6 @@ Tcl_VwaitObjCmd(clientData, interp, objc, objv)
     foundEvent = 1;
     while (!done && foundEvent) {
 	foundEvent = Tcl_DoOneEvent(TCL_ALL_EVENTS);
-	if (Tcl_LimitExceeded(interp)) {
-	    return TCL_ERROR;
-	}
     }
     Tcl_UntraceVar(interp, nameString,
 	    TCL_GLOBAL_ONLY|TCL_TRACE_WRITES|TCL_TRACE_UNSETS,
@@ -1203,9 +1200,6 @@ Tcl_UpdateObjCmd(clientData, interp, objc, objv)
     }
     
     while (Tcl_DoOneEvent(flags) != 0) {
-	if (Tcl_LimitExceeded(interp)) {
-	    return TCL_ERROR;
-	}
     }
 
     /*
-- 
cgit v0.12