diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-02-12 19:03:40 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-02-12 19:03:40 (GMT) |
commit | c26dc231a7444dec93a9c2c66c9808d993a84675 (patch) | |
tree | 97f68909d5a1a77b8d7fdfacfe69f6de99401b47 | |
parent | 0a7026859d3375cd02acc21c0d0f03732040dda6 (diff) | |
parent | a2fefd7c501decfa882cddf51b77ec0ebb289d0f (diff) | |
download | tcl-c26dc231a7444dec93a9c2c66c9808d993a84675.zip tcl-c26dc231a7444dec93a9c2c66c9808d993a84675.tar.gz tcl-c26dc231a7444dec93a9c2c66c9808d993a84675.tar.bz2 |
Merge 8.5. (add some unused spare stub entries)
-rw-r--r-- | generic/tcl.decls | 2 | ||||
-rw-r--r-- | generic/tclDecls.h | 30 | ||||
-rw-r--r-- | generic/tclStubInit.c | 10 |
3 files changed, 37 insertions, 5 deletions
diff --git a/generic/tcl.decls b/generic/tcl.decls index 42438c1..74f5846 100644 --- a/generic/tcl.decls +++ b/generic/tcl.decls @@ -2325,7 +2325,7 @@ declare 630 { # ----- BASELINE -- FOR -- 8.6.0 ----- # -declare 660 { +declare 668 { void TclUnusedStubEntry(void) } diff --git a/generic/tclDecls.h b/generic/tclDecls.h index 621b1ba..3047f1e 100644 --- a/generic/tclDecls.h +++ b/generic/tclDecls.h @@ -1844,7 +1844,15 @@ EXTERN void Tcl_ZlibStreamSetCompressionDictionary( /* Slot 657 is reserved */ /* Slot 658 is reserved */ /* Slot 659 is reserved */ -/* 660 */ +/* Slot 660 is reserved */ +/* Slot 661 is reserved */ +/* Slot 662 is reserved */ +/* Slot 663 is reserved */ +/* Slot 664 is reserved */ +/* Slot 665 is reserved */ +/* Slot 666 is reserved */ +/* Slot 667 is reserved */ +/* 668 */ EXTERN void TclUnusedStubEntry(void); typedef struct { @@ -2541,7 +2549,15 @@ typedef struct TclStubs { void (*reserved657)(void); void (*reserved658)(void); void (*reserved659)(void); - void (*tclUnusedStubEntry) (void); /* 660 */ + void (*reserved660)(void); + void (*reserved661)(void); + void (*reserved662)(void); + void (*reserved663)(void); + void (*reserved664)(void); + void (*reserved665)(void); + void (*reserved666)(void); + void (*reserved667)(void); + void (*tclUnusedStubEntry) (void); /* 668 */ } TclStubs; extern const TclStubs *tclStubsPtr; @@ -3863,8 +3879,16 @@ extern const TclStubs *tclStubsPtr; /* Slot 657 is reserved */ /* Slot 658 is reserved */ /* Slot 659 is reserved */ +/* Slot 660 is reserved */ +/* Slot 661 is reserved */ +/* Slot 662 is reserved */ +/* Slot 663 is reserved */ +/* Slot 664 is reserved */ +/* Slot 665 is reserved */ +/* Slot 666 is reserved */ +/* Slot 667 is reserved */ #define TclUnusedStubEntry \ - (tclStubsPtr->tclUnusedStubEntry) /* 660 */ + (tclStubsPtr->tclUnusedStubEntry) /* 668 */ #endif /* defined(USE_TCL_STUBS) */ diff --git a/generic/tclStubInit.c b/generic/tclStubInit.c index 14440c4..c27e6a9 100644 --- a/generic/tclStubInit.c +++ b/generic/tclStubInit.c @@ -1649,7 +1649,15 @@ const TclStubs tclStubs = { 0, /* 657 */ 0, /* 658 */ 0, /* 659 */ - TclUnusedStubEntry, /* 660 */ + 0, /* 660 */ + 0, /* 661 */ + 0, /* 662 */ + 0, /* 663 */ + 0, /* 664 */ + 0, /* 665 */ + 0, /* 666 */ + 0, /* 667 */ + TclUnusedStubEntry, /* 668 */ }; /* !END!: Do not edit above this line. */ |