diff options
| author | nijtmans@users.sourceforge.net <jan.nijtmans> | 2013-02-17 21:03:56 (GMT) |
|---|---|---|
| committer | nijtmans@users.sourceforge.net <jan.nijtmans> | 2013-02-17 21:03:56 (GMT) |
| commit | 33bea9773fb937ed637a72fbd2f0bbae4735af49 (patch) | |
| tree | d52e8324f407af23496031cb1f295802ec61200f /generic/tclDecls.h | |
| parent | 67d6878549801f295775796f6d29fc556f7b7d96 (diff) | |
| download | tcl-33bea9773fb937ed637a72fbd2f0bbae4735af49.zip tcl-33bea9773fb937ed637a72fbd2f0bbae4735af49.tar.gz tcl-33bea9773fb937ed637a72fbd2f0bbae4735af49.tar.bz2 | |
Use (preferred) Tcl_ObjSetVar2 in stead of Tcl_SetVar in tclAppInit.c, both UNIX and Win.
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) |