diff options
Diffstat (limited to 'generic')
-rw-r--r-- | generic/tclEvent.c | 5 | ||||
-rwxr-xr-x[-rw-r--r--] | generic/tclThreadAlloc.c | 0 |
2 files changed, 5 insertions, 0 deletions
diff --git a/generic/tclEvent.c b/generic/tclEvent.c index 0b585b6..ae79cad 100644 --- a/generic/tclEvent.c +++ b/generic/tclEvent.c @@ -1462,6 +1462,11 @@ VwaitVarProc( int *donePtr = clientData; *donePtr = 1; + + Tcl_UntraceVar(interp, name1, + TCL_GLOBAL_ONLY|TCL_TRACE_WRITES|TCL_TRACE_UNSETS, + VwaitVarProc, clientData); + return NULL; } diff --git a/generic/tclThreadAlloc.c b/generic/tclThreadAlloc.c index e4261d6..e4261d6 100644..100755 --- a/generic/tclThreadAlloc.c +++ b/generic/tclThreadAlloc.c |