diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-11-20 11:26:27 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-11-20 11:26:27 (GMT) |
| commit | 2d8aceecca2c639bafce1dd90900ba305128ac12 (patch) | |
| tree | a85aacb9a5823323072e332f7fd52e55542ceb03 /generic/tcl.h | |
| parent | 10dd9595a33e80ac7ab8ae5ff11b6b6ef3059b20 (diff) | |
| download | tcl-2d8aceecca2c639bafce1dd90900ba305128ac12.zip tcl-2d8aceecca2c639bafce1dd90900ba305128ac12.tar.gz tcl-2d8aceecca2c639bafce1dd90900ba305128ac12.tar.bz2 | |
Change Tcl_VarTraceInfo into a macro, just as Tcl_EvalObj/Tcl_GlobalEvalObj
Diffstat (limited to 'generic/tcl.h')
| -rw-r--r-- | generic/tcl.h | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/generic/tcl.h b/generic/tcl.h index e921ec5..9c63b94 100644 --- a/generic/tcl.h +++ b/generic/tcl.h @@ -2414,6 +2414,9 @@ EXTERN void Tcl_GetMemoryInfo _ANSI_ARGS_((Tcl_DString *dsPtr)); # undef Tcl_GlobalEvalObj # define Tcl_GlobalEvalObj(interp,objPtr) \ Tcl_EvalObjEx((interp),(objPtr),TCL_EVAL_GLOBAL) +# undef Tcl_VarTraceInfo +# define Tcl_VarTraceInfo(interp, varName, flags, proc, prevClientData) \ + Tcl_VarTraceInfo2(interp, varName, NULL, flags, proc, prevClientData) /* * These function have been renamed. The old names are deprecated, but we |