diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-07-19 12:14:21 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-07-19 12:14:21 (GMT) |
| commit | 1fc31a71b82cae8f8431f4bdd1e6f8aa925d65ea (patch) | |
| tree | 9bd3a45da57ec6bdc98bdf377ee89a5caa9022e9 | |
| parent | 5d45d73b29afd5a9bb5df459ede7055b3e97ba5d (diff) | |
| download | tcl-1fc31a71b82cae8f8431f4bdd1e6f8aa925d65ea.zip tcl-1fc31a71b82cae8f8431f4bdd1e6f8aa925d65ea.tar.gz tcl-1fc31a71b82cae8f8431f4bdd1e6f8aa925d65ea.tar.bz2 | |
Undo changes in tclDecls.h from previous commit: Tk still needs it
| -rw-r--r-- | generic/tclDecls.h | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/generic/tclDecls.h b/generic/tclDecls.h index 28696df..b869c97 100644 --- a/generic/tclDecls.h +++ b/generic/tclDecls.h @@ -4069,10 +4069,19 @@ extern const TclStubs *tclStubsPtr; #undef TclUnusedStubEntry #if defined(USE_TCL_STUBS) +# undef Tcl_CreateInterp # undef Tcl_FindExecutable +# undef Tcl_GetStringResult +# undef Tcl_Init # undef Tcl_SetPanicProc # undef Tcl_SetExitProc +# undef Tcl_ObjSetVar2 # undef Tcl_StaticLibrary +# define Tcl_CreateInterp() (tclStubsPtr->tcl_CreateInterp()) +# define Tcl_GetStringResult(interp) (tclStubsPtr->tcl_GetStringResult(interp)) +# define Tcl_Init(interp) (tclStubsPtr->tcl_Init(interp)) +# define Tcl_ObjSetVar2(interp, part1, part2, newValue, flags) \ + (tclStubsPtr->tcl_ObjSetVar2(interp, part1, part2, newValue, flags)) #endif #if defined(_WIN32) && defined(UNICODE) |