diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-02-27 11:42:39 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-02-27 11:42:39 (GMT) |
| commit | 47bc13b6d44edf2161eb16a0ae13020000cb8732 (patch) | |
| tree | 91534327ea558e3c3471225c1819aee8ebb98aa1 /generic/tclEvent.c | |
| parent | b9e65c9024612809636cc0bd56376d484374858d (diff) | |
| download | tcl-47bc13b6d44edf2161eb16a0ae13020000cb8732.zip tcl-47bc13b6d44edf2161eb16a0ae13020000cb8732.tar.gz tcl-47bc13b6d44edf2161eb16a0ae13020000cb8732.tar.bz2 | |
Some VOID -> void, Tcl_TraceVar -> Tcl_TraceVar2 and Tcl_VarTraceInfo -> Tcl_VarTraceInfo2 conversions.
Diffstat (limited to 'generic/tclEvent.c')
| -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 0b585b6..c8ba1e6 100644 --- a/generic/tclEvent.c +++ b/generic/tclEvent.c @@ -1402,7 +1402,7 @@ Tcl_VwaitObjCmd( return TCL_ERROR; } nameString = Tcl_GetString(objv[1]); - if (Tcl_TraceVar(interp, nameString, + if (Tcl_TraceVar2(interp, nameString, NULL, TCL_GLOBAL_ONLY|TCL_TRACE_WRITES|TCL_TRACE_UNSETS, VwaitVarProc, &done) != TCL_OK) { return TCL_ERROR; @@ -1420,7 +1420,7 @@ Tcl_VwaitObjCmd( break; } } - Tcl_UntraceVar(interp, nameString, + Tcl_UntraceVar2(interp, nameString, NULL, TCL_GLOBAL_ONLY|TCL_TRACE_WRITES|TCL_TRACE_UNSETS, VwaitVarProc, &done); |