summaryrefslogtreecommitdiffstats
path: root/generic/tclEvent.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2016-06-26 07:51:22 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2016-06-26 07:51:22 (GMT)
commit2b756b48f0fcb3c5117930e9ad1be22561d9728b (patch)
tree18e0110c3a4f6b3589872553b3e0db9a7209d300 /generic/tclEvent.c
parent8211d5bc63a57a3d51b8f6c605a9e4e4a992a6ec (diff)
parent94c255833358445b9edae73af1ffbe1cc2c8ab42 (diff)
downloadtcl-drh_micro_optimization.zip
tcl-drh_micro_optimization.tar.gz
tcl-drh_micro_optimization.tar.bz2
Diffstat (limited to 'generic/tclEvent.c')
-rw-r--r--generic/tclEvent.c2
1 files changed, 2 insertions, 0 deletions
diff --git a/generic/tclEvent.c b/generic/tclEvent.c
index a16a3b1..0eabc13 100644
--- a/generic/tclEvent.c
+++ b/generic/tclEvent.c
@@ -1465,6 +1465,8 @@ VwaitVarProc(
int *donePtr = clientData;
*donePtr = 1;
+ Tcl_UntraceVar(interp, name1, TCL_TRACE_WRITES|TCL_TRACE_UNSETS,
+ VwaitVarProc, clientData);
return NULL;
}