diff options
| author | jan.nijtmans <jan.nijtmans@noemail.net> | 2013-02-17 21:03:56 (GMT) |
|---|---|---|
| committer | jan.nijtmans <jan.nijtmans@noemail.net> | 2013-02-17 21:03:56 (GMT) |
| commit | f031dd571c8144833a6822dc4c1d01a33c0c91ec (patch) | |
| tree | d52e8324f407af23496031cb1f295802ec61200f /generic/tclDecls.h | |
| parent | 6868cfef431ffd2e43b7b4ebef30b2bebcb01314 (diff) | |
| download | tcl-f031dd571c8144833a6822dc4c1d01a33c0c91ec.zip tcl-f031dd571c8144833a6822dc4c1d01a33c0c91ec.tar.gz tcl-f031dd571c8144833a6822dc4c1d01a33c0c91ec.tar.bz2 | |
Use (preferred) Tcl_ObjSetVar2 in stead of Tcl_SetVar in tclAppInit.c, both UNIX and Win.
FossilOrigin-Name: c5362b1bbd102f293a52829b9dd4f59b5dd0da28
Diffstat (limited to 'generic/tclDecls.h')
| -rw-r--r-- | generic/tclDecls.h | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/generic/tclDecls.h b/generic/tclDecls.h index fe9ba2b..d931873 100644 --- a/generic/tclDecls.h +++ b/generic/tclDecls.h @@ -3783,6 +3783,7 @@ extern const TclStubs *tclStubsPtr; # undef Tcl_Init # undef Tcl_SetPanicProc # undef Tcl_SetVar +# undef Tcl_ObjSetVar2 # undef Tcl_StaticPackage # undef TclFSGetNativePath # define Tcl_CreateInterp() (tclStubsPtr->tcl_CreateInterp()) @@ -3791,6 +3792,8 @@ extern const TclStubs *tclStubsPtr; # define Tcl_SetPanicProc(proc) (tclStubsPtr->tcl_SetPanicProc(proc)) # define Tcl_SetVar(interp, varName, newValue, flags) \ (tclStubsPtr->tcl_SetVar(interp, varName, newValue, flags)) +# define Tcl_ObjSetVar2(interp, part1, part2, newValue, flags) \ + (tclStubsPtr->tcl_ObjSetVar2(interp, part1, part2, newValue, flags)) #endif #if defined(_WIN32) && defined(UNICODE) |