diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-12-02 20:02:41 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-12-02 20:02:41 (GMT) |
| commit | a7858d818d69719efc88a5de7dfcf85032e7540b (patch) | |
| tree | fa283701cbfde8d14f8389c75cc6bf619ac09ee9 /generic/tclStubInit.c | |
| parent | e2bde4d007334476f45e57a87d273a4eca7e9aec (diff) | |
| download | tcl-a7858d818d69719efc88a5de7dfcf85032e7540b.zip tcl-a7858d818d69719efc88a5de7dfcf85032e7540b.tar.gz tcl-a7858d818d69719efc88a5de7dfcf85032e7540b.tar.bz2 | |
If compiled with -DTCL_NO_DEPRECATED, remove the Tcl_SetIntObj/Tcl_SetLongObj entries from stub table: Since they are gone in Tcl 9.0
Diffstat (limited to 'generic/tclStubInit.c')
| -rw-r--r-- | generic/tclStubInit.c | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/generic/tclStubInit.c b/generic/tclStubInit.c index 106bb08..feabc3b 100644 --- a/generic/tclStubInit.c +++ b/generic/tclStubInit.c @@ -95,6 +95,9 @@ static int TclSockMinimumBuffersOld(int sock, int size) # define Tcl_CreateMathFunc 0 # define Tcl_GetMathFuncInfo 0 # define Tcl_ListMathFuncs 0 +# define Tcl_SetIntObj 0 +# define Tcl_SetLongObj 0 + #else #define TclSetStartupScriptPath setStartupScriptPath static void TclSetStartupScriptPath(Tcl_Obj *path) |