diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-11-16 16:59:34 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-11-16 16:59:34 (GMT) |
| commit | 81a213ed4ce77b15fbc6d5d97cc1235b689ad482 (patch) | |
| tree | 02de1ac6dd6c22c81c4c8e7163f777b90183db97 /generic/tclStubInit.c | |
| parent | 31b544baefc9bf84fded3c7dfb98da9db1032e10 (diff) | |
| parent | 6c20a6ff0d3a2aea218b48df0ff32aafeb23167d (diff) | |
| download | tcl-81a213ed4ce77b15fbc6d5d97cc1235b689ad482.zip tcl-81a213ed4ce77b15fbc6d5d97cc1235b689ad482.tar.gz tcl-81a213ed4ce77b15fbc6d5d97cc1235b689ad482.tar.bz2 | |
Merge 8.7
Diffstat (limited to 'generic/tclStubInit.c')
| -rw-r--r-- | generic/tclStubInit.c | 18 |
1 files changed, 10 insertions, 8 deletions
diff --git a/generic/tclStubInit.c b/generic/tclStubInit.c index 5028916..a1878c1 100644 --- a/generic/tclStubInit.c +++ b/generic/tclStubInit.c @@ -186,7 +186,7 @@ static const char *TclUtfPrev(const char *src, const char *start) { #define TclBN_s_mp_sub s_mp_sub #define TclBN_mp_toom_mul s_mp_toom_mul #define TclBN_mp_toom_sqr s_mp_toom_sqr -#define TclUnusedStubEntry NULL +#define TclUnusedStubEntry 0 /* See bug 510001: TclSockMinimumBuffers needs plat imp */ #if defined(_WIN64) || defined(TCL_NO_DEPRECATED) || TCL_MAJOR_VERSION > 8 @@ -1041,8 +1041,7 @@ static const TclIntStubs tclIntStubs = { TclPtrUnsetVar, /* 256 */ TclStaticLibrary, /* 257 */ TclpCreateTemporaryDirectory, /* 258 */ - TclGetBytesFromObj, /* 259 */ - TclUnusedStubEntry, /* 260 */ + TclUnusedStubEntry, /* 259 */ }; static const TclIntPlatStubs tclIntPlatStubs = { @@ -1920,10 +1919,10 @@ const TclStubs tclStubs = { TclZipfs_Unmount, /* 633 */ TclZipfs_TclLibrary, /* 634 */ TclZipfs_MountBuffer, /* 635 */ - Tcl_FreeIntRep, /* 636 */ + Tcl_FreeInternalRep, /* 636 */ Tcl_InitStringRep, /* 637 */ - Tcl_FetchIntRep, /* 638 */ - Tcl_StoreIntRep, /* 639 */ + Tcl_FetchInternalRep, /* 638 */ + Tcl_StoreInternalRep, /* 639 */ Tcl_HasStringRep, /* 640 */ Tcl_IncrRefCount, /* 641 */ Tcl_DecrRefCount, /* 642 */ @@ -1933,8 +1932,8 @@ const TclStubs tclStubs = { Tcl_UtfToUniChar, /* 646 */ Tcl_UniCharToUtfDString, /* 647 */ Tcl_UtfToUniCharDString, /* 648 */ - 0, /* 649 */ - 0, /* 650 */ + TclGetBytesFromObj, /* 649 */ + Tcl_GetBytesFromObj, /* 650 */ TclGetStringFromObj, /* 651 */ TclGetUnicodeFromObj, /* 652 */ TclGetByteArrayFromObj, /* 653 */ @@ -1942,6 +1941,9 @@ const TclStubs tclStubs = { Tcl_UtfNext, /* 655 */ Tcl_UtfPrev, /* 656 */ Tcl_UniCharIsUnicode, /* 657 */ + 0, /* 658 */ + 0, /* 659 */ + Tcl_AsyncMarkFromSignal, /* 660 */ }; /* !END!: Do not edit above this line. */ |