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