diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-09-04 22:08:23 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-09-04 22:08:23 (GMT) |
| commit | 2cd19c4e6bde78b2754deda187fec816a7c8283f (patch) | |
| tree | 75a78154e1f7b78b95574d018dbf3d16e8e15332 | |
| parent | ed985943f3df9f3ed7b6cc8130c0e67cece08dfd (diff) | |
| download | tcl-2cd19c4e6bde78b2754deda187fec816a7c8283f.zip tcl-2cd19c4e6bde78b2754deda187fec816a7c8283f.tar.gz tcl-2cd19c4e6bde78b2754deda187fec816a7c8283f.tar.bz2 | |
Bring back Tcl_UntraceVar
| -rw-r--r-- | generic/tclEvent.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclEvent.c b/generic/tclEvent.c index 91bc995..d5a3776 100644 --- a/generic/tclEvent.c +++ b/generic/tclEvent.c @@ -1475,10 +1475,10 @@ VwaitVarProc( int *donePtr = (int *)clientData; (void)dummy; (void)flags; - (void)name1; - (void)name2; *donePtr = 1; + Tcl_UntraceVar2(interp, name1, name2, TCL_TRACE_WRITES|TCL_TRACE_UNSETS, + VwaitVarProc, clientData); return NULL; } |