diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2017-12-01 15:03:46 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2017-12-01 15:03:46 (GMT) |
| commit | 71c032c81630285df2581432aeb509295fbb39ed (patch) | |
| tree | d7736549826d2697b558a2db03759c1f7e3f3524 /generic/tclStubInit.c | |
| parent | 4bf4b7d35c401066e61ad2ce1d21b04709a57938 (diff) | |
| parent | 200910b9c19ac1986d28677de7b427ee774d8e40 (diff) | |
| download | tcl-71c032c81630285df2581432aeb509295fbb39ed.zip tcl-71c032c81630285df2581432aeb509295fbb39ed.tar.gz tcl-71c032c81630285df2581432aeb509295fbb39ed.tar.bz2 | |
merge trunk
Diffstat (limited to 'generic/tclStubInit.c')
| -rw-r--r-- | generic/tclStubInit.c | 8 |
1 files changed, 2 insertions, 6 deletions
diff --git a/generic/tclStubInit.c b/generic/tclStubInit.c index ca3f447..04ee066 100644 --- a/generic/tclStubInit.c +++ b/generic/tclStubInit.c @@ -272,10 +272,6 @@ static int formatInt(char *buffer, int n){ # define Tcl_DiscardResult 0 # undef Tcl_SetResult # define Tcl_SetResult 0 -# undef Tcl_EvalObj -# define Tcl_EvalObj 0 -# undef Tcl_GlobalEvalObj -# define Tcl_GlobalEvalObj 0 #endif /* !TCL_NO_DEPRECATED */ /* @@ -901,7 +897,7 @@ const TclStubs tclStubs = { Tcl_ErrnoMsg, /* 128 */ Tcl_Eval, /* 129 */ Tcl_EvalFile, /* 130 */ - Tcl_EvalObj, /* 131 */ + 0, /* 131 */ Tcl_EventuallyFree, /* 132 */ Tcl_Exit, /* 133 */ Tcl_ExposeCommand, /* 134 */ @@ -956,7 +952,7 @@ const TclStubs tclStubs = { Tcl_GetVar, /* 175 */ Tcl_GetVar2, /* 176 */ Tcl_GlobalEval, /* 177 */ - Tcl_GlobalEvalObj, /* 178 */ + 0, /* 178 */ Tcl_HideCommand, /* 179 */ Tcl_Init, /* 180 */ Tcl_InitHashTable, /* 181 */ |
