diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-06-26 07:51:22 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-06-26 07:51:22 (GMT) |
commit | 2b756b48f0fcb3c5117930e9ad1be22561d9728b (patch) | |
tree | 18e0110c3a4f6b3589872553b3e0db9a7209d300 /generic/tclEvent.c | |
parent | 8211d5bc63a57a3d51b8f6c605a9e4e4a992a6ec (diff) | |
parent | 94c255833358445b9edae73af1ffbe1cc2c8ab42 (diff) | |
download | tcl-drh_micro_optimization.zip tcl-drh_micro_optimization.tar.gz tcl-drh_micro_optimization.tar.bz2 |
Merge trunkdrh_micro_optimization
Diffstat (limited to 'generic/tclEvent.c')
-rw-r--r-- | generic/tclEvent.c | 2 |
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; } |