diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-03-04 10:36:23 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-03-04 10:36:23 (GMT) |
| commit | 063e0061117b2034334ecc544f382dd39ad52fc7 (patch) | |
| tree | 5c7bef44b2290e1d0d1a6946ee8efb87652d957c /generic/tclDecls.h | |
| parent | 4355668c8010a804c30b6ab9a76aef16e3a71436 (diff) | |
| parent | 19bfe564de0184d2136d878e1d56593cbd5fce3a (diff) | |
| download | tcl-063e0061117b2034334ecc544f382dd39ad52fc7.zip tcl-063e0061117b2034334ecc544f382dd39ad52fc7.tar.gz tcl-063e0061117b2034334ecc544f382dd39ad52fc7.tar.bz2 | |
Merge 8.6
Diffstat (limited to 'generic/tclDecls.h')
| -rw-r--r-- | generic/tclDecls.h | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/generic/tclDecls.h b/generic/tclDecls.h index dc39657..4b91817 100644 --- a/generic/tclDecls.h +++ b/generic/tclDecls.h @@ -1931,6 +1931,10 @@ EXTERN Tcl_UniChar * TclGetUnicodeFromObj(Tcl_Obj *objPtr, /* 653 */ EXTERN unsigned char * TclGetByteArrayFromObj(Tcl_Obj *objPtr, size_t *lengthPtr); +/* Slot 654 is reserved */ +/* Slot 655 is reserved */ +/* 656 */ +EXTERN void TclUnusedStubEntry(void); typedef struct { const struct TclPlatStubs *tclPlatStubs; @@ -2620,6 +2624,9 @@ typedef struct TclStubs { char * (*tclGetStringFromObj) (Tcl_Obj *objPtr, size_t *lengthPtr); /* 651 */ Tcl_UniChar * (*tclGetUnicodeFromObj) (Tcl_Obj *objPtr, size_t *lengthPtr); /* 652 */ unsigned char * (*tclGetByteArrayFromObj) (Tcl_Obj *objPtr, size_t *lengthPtr); /* 653 */ + void (*reserved654)(void); + void (*reserved655)(void); + void (*tclUnusedStubEntry) (void); /* 656 */ } TclStubs; extern const TclStubs *tclStubsPtr; @@ -3956,11 +3963,16 @@ extern const TclStubs *tclStubsPtr; (tclStubsPtr->tclGetUnicodeFromObj) /* 652 */ #define TclGetByteArrayFromObj \ (tclStubsPtr->tclGetByteArrayFromObj) /* 653 */ +/* Slot 654 is reserved */ +/* Slot 655 is reserved */ +#define TclUnusedStubEntry \ + (tclStubsPtr->tclUnusedStubEntry) /* 656 */ #endif /* defined(USE_TCL_STUBS) */ /* !END!: Do not edit above this line. */ +#undef TclUnusedStubEntry #if defined(USE_TCL_STUBS) # undef Tcl_CreateInterp # undef Tcl_FindExecutable |