diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-12-03 16:12:14 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-12-03 16:12:14 (GMT) |
| commit | d8fd9552b555513cd62d8be2ae422a92c7be9d0e (patch) | |
| tree | f98fdd0861795e17610ebd5020f3e7b4c4f30980 /generic/tclStubInit.c | |
| parent | d33f396b9985896f717cbfa81422b28ac486eadd (diff) | |
| parent | 28d5df364efed067ead97734d5e619615bfd8cde (diff) | |
| download | tcl-d8fd9552b555513cd62d8be2ae422a92c7be9d0e.zip tcl-d8fd9552b555513cd62d8be2ae422a92c7be9d0e.tar.gz tcl-d8fd9552b555513cd62d8be2ae422a92c7be9d0e.tar.bz2 | |
Merge 8.7
Diffstat (limited to 'generic/tclStubInit.c')
| -rw-r--r-- | generic/tclStubInit.c | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/generic/tclStubInit.c b/generic/tclStubInit.c index 88a1044..53823b1 100644 --- a/generic/tclStubInit.c +++ b/generic/tclStubInit.c @@ -513,7 +513,6 @@ static int uniCharNcasecmp(const Tcl_UniChar *ucs, const Tcl_UniChar *uct, unsig # define Tcl_SetPanicProc 0 # define Tcl_FindExecutable 0 # define Tcl_GetUnicode 0 -# define TclOldFreeObj 0 # undef Tcl_StringMatch # define Tcl_StringMatch 0 # define TclBN_reverse 0 @@ -548,7 +547,6 @@ static int uniCharNcasecmp(const Tcl_UniChar *ucs, const Tcl_UniChar *uct, unsig # define TclGetCommandFullName Tcl_GetCommandFullName # define TclpLocaltime_unix TclpLocaltime # define TclpGmtime_unix TclpGmtime -# define TclOldFreeObj TclFreeObj static int seekOld( @@ -1053,7 +1051,7 @@ const TclTomMathStubs tclTomMathStubs = { TclBN_mp_tc_or, /* 74 */ TclBN_mp_tc_xor, /* 75 */ TclBN_mp_signed_rsh, /* 76 */ - TclBN_mp_get_bit, /* 77 */ + 0, /* 77 */ TclBN_mp_to_ubin, /* 78 */ 0, /* 79 */ TclBN_mp_to_radix, /* 80 */ @@ -1114,7 +1112,7 @@ const TclStubs tclStubs = { Tcl_DbNewObj, /* 27 */ Tcl_DbNewStringObj, /* 28 */ Tcl_DuplicateObj, /* 29 */ - TclOldFreeObj, /* 30 */ + TclFreeObj, /* 30 */ Tcl_GetBoolean, /* 31 */ Tcl_GetBooleanFromObj, /* 32 */ Tcl_GetByteArrayFromObj, /* 33 */ |